chiark / gitweb /
i18n: i18n-diff-auditor: fix new invented here doc
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Mon, 1 Oct 2018 02:22:15 +0000 (03:22 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Mon, 1 Oct 2018 02:23:39 +0000 (03:23 +0100)
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
i18n-diff-auditor

index 1345419..17bd81c 100755 (executable)
@@ -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{^ (["'])( (?: [^\\'"]