X-Git-Url: http://git.archive.openwrt.org/?p=project%2Fluci.git;a=blobdiff_plain;f=build%2Fi18n-scan.pl;h=899d90d22c282ada2e203cc249a75a52aa51aa83;hp=cee07fdfe1ea21e4174f03ce3d436d88e0c8f8ca;hb=0bfe064cc3f6c17cae6035d4a87066cdb6464078;hpb=4ab2d1017e3e3b925d06713eb196f1dc99ae5da8

diff --git a/build/i18n-scan.pl b/build/i18n-scan.pl
index cee07fdfe..899d90d22 100755
--- a/build/i18n-scan.pl
+++ b/build/i18n-scan.pl
@@ -28,6 +28,7 @@ sub dec_tpl_str
 	$s =~ s/[\s\n]+/ /g;
 	$s =~ s/^ //;
 	$s =~ s/ $//;
+	$s =~ s/\\/\\\\/g;
 	return $s;
 }
 
@@ -51,6 +52,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]*\)$//;
 
@@ -63,10 +65,14 @@ if( open F, "find @ARGV -type f '(' -name '*.htm' -o -name '*.lua' ')' |" )
 					{
 						( $sub, $code ) = extract_delimited($code, q{'"}, q{\s*(?:\.\.\s*)?});
 
-						if( defined $sub )
+						if( defined $sub && length($sub) > 2 )
 						{
 							$res .= substr $sub, 1, length($sub) - 2;
 						}
+						else
+						{
+							undef $sub;
+						}
 					}
 				}
 				elsif( $code =~ /^(\[=*\[)/ )