diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2018-09-30 21:21:40 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2018-10-01 00:54:38 +0100 |
commit | 2a2b0931f9b29bf372136451d317eb81649424e2 (patch) | |
tree | 32e5a9f901a4faefff3480e0c3ddc5e752e61db1 /i18n-diff-auditor | |
parent | 23047ce673309f327869363f16e77926448db133 (diff) |
i18n: i18n-diff-auditor: fix multi-arg handling
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'i18n-diff-auditor')
-rwxr-xr-x | i18n-diff-auditor | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/i18n-diff-auditor b/i18n-diff-auditor index e8c86fe..61f877e 100755 --- a/i18n-diff-auditor +++ b/i18n-diff-auditor @@ -267,9 +267,11 @@ sub analyse_chunk_core () { } $next_y->(); if (!$bras and - (grep { $y->{E} eq $_ } qw( or xor and not ; : ) + (grep { $y->{E} eq $_ } qw( or xor and not ; : , ) or $y->{T} eq 'ket' )) { + # lookahead shows close of containing scope + # or lower precedence operator unshift @ys, $y; last; } |