X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=blobdiff_plain;f=i18n-diff-auditor;fp=i18n-diff-auditor;h=116b0f82fd314fe005ef3de278ba39bbeae922c5;hp=beb3a9ab10a00e25732ca50dd43bfe9261995fef;hb=1c9a99297143d028936205973ebbeba47f5e8213;hpb=87f6b9fcc58b478597e728fc41d4c2b56fa99951 diff --git a/i18n-diff-auditor b/i18n-diff-auditor index beb3a9ab..116b0f82 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{^ (["'])( (?: [^\\'"]