i18n: i18n-diff-auditor: fix new invented here doc

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

diff --git a/i18n-diff-auditor b/i18n-diff-auditor
index 13454197c7a4be61f62dddce2f2a57bbe3f29435..17bd81ce366b49b2cc7d462f33146b1b5e4f9901 100755 (executable)
--- a/i18n-diff-auditor
+++ b/i18n-diff-auditor
@@ -145,8 +145,9 @@ sub semiparse ($) {
                 }{ $1 }xe) {
                $o[$#o]{V} = $2;
             } else {
-               s{ \n (.*) }{ \n }s;
-               $o[$#o]{V} = $1;
+               m{^.*\n} or confess;
+               $_ = $&;
+               $o[$#o]{V} = $';
                $o[$#o]{Invented} = 1;
            }
        } elsif (s{^ (["'])( (?: [^\\'"]