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 cee07fd..8807384 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{('")});
 
                        {
                                ( my $code, $text ) = extract_bracketed($text, q{('")});
 

+                               $code =~ s/\\\n/ /g;

                                $code =~ s/^\([\n\s]*//;
                                $code =~ s/[\n\s]*\)$//;
 
                                $code =~ s/^\([\n\s]*//;
                                $code =~ s/[\n\s]*\)$//;