i18n: i18n-diff-auditor: fix multi-arg handling

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/i18n-diff-auditor b/i18n-diff-auditor
index e8c86fec55426a63c3d784eafa8a3c4cf84e4fc2..61f877ed9719e9db09152dbb3b885e03ddfe0c35 100755 (executable)
--- a/i18n-diff-auditor
+++ b/i18n-diff-auditor
@@ -267,9 +267,11 @@ sub analyse_chunk_core () {
                    }
                    $next_y->();
                    if (!$bras and
                    }
                    $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'
                        )) {
                         or $y->{T} eq 'ket'
                        )) {

+                       # lookahead shows close of containing scope
+                       # or lower precedence operator

                        unshift @ys, $y;
                        last;
                    }
                        unshift @ys, $y;
                        last;
                    }