summaryrefslogtreecommitdiff
path: root/i18n-diff-auditor
diff options
context:
space:
mode:
authorIan Jackson <ijackson@chiark.greenend.org.uk>2018-10-01 02:44:00 +0100
committerIan Jackson <ijackson@chiark.greenend.org.uk>2018-10-01 02:44:40 +0100
commit1c9a99297143d028936205973ebbeba47f5e8213 (patch)
tree129c4ee0576b23f9380ebdf4643809de704f6e30 /i18n-diff-auditor
parent87f6b9fcc58b478597e728fc41d4c2b56fa99951 (diff)
i18n: i18n-diff-auditor: fix here doc regexp
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'i18n-diff-auditor')
-rwxr-xr-xi18n-diff-auditor6
1 files changed, 3 insertions, 3 deletions
diff --git a/i18n-diff-auditor b/i18n-diff-auditor
index beb3a9a..116b0f8 100755
--- a/i18n-diff-auditor
+++ b/i18n-diff-auditor
@@ -138,9 +138,9 @@ sub semiparse ($) {
push @o, { T => 'heredoc', Q => $q, Delim => $d,
E => $&, P => "<<$q$d$q" };
s{^
- ( .* \n )
- ( (?: (?! $d) .* \n )* )
- $d \n
+ ( .* \n )
+ ( (?: (?! $d \n ) .* \n )*? )
+ $d \n
}{ $1 }xe or die "missing end of here doc $d\n";
$o[$#o]{V} = $2;
} elsif (s{^ (["'])( (?: [^\\'"]