build: i18n-scan.pl: cope with strings that contain escaped newlines, spotted in...

diff --git a/build/i18n-scan.pl b/build/i18n-scan.pl
index cee07fdfe1ea21e4174f03ce3d436d88e0c8f8ca..88073840277edaefd40c7c6c862ec9ef8a631918 100755 (executable)
--- a/build/i18n-scan.pl
+++ b/build/i18n-scan.pl
@@ -51,6 +51,7 @@ if( open F, "find @ARGV -type f '(' -name '*.htm' -o -name '*.lua' ')' |" )
                        {
                                ( my $code, $text ) = extract_bracketed($text, q{('")});
 
+                               $code =~ s/\\\n/ /g;
                                $code =~ s/^\([\n\s]*//;
                                $code =~ s/[\n\s]*\)$//;