Difuse/luci
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

build: rework i18n-scan.pl defined checks

Browse source
This commit is contained in:
Jo-Philipp Wich 2012-04-02 23:57:11 +00:00
parent 4c48b56875
commit c024eca0fc
1 changed files with 2 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
build/i18n-scan.pl
View file

@ -60,15 +60,11 @@ if( open F, "find @ARGV -type f '(' -name '*.htm' -o -name '*.lua' ')' |" )
if( $code =~ /^['"]/ ) if( $code =~ /^['"]/ )
{ {
while( defined $sub ) while( defined $sub && length($sub) > 0 )
{ {
( $sub, $code ) = extract_delimited($code, q{'"}, q{\s*(?:\.\.\s*)?}); ( $sub, $code ) = extract_delimited($code, q{'"}, q{\s*(?:\.\.\s*)?});
if( length($sub) < 1 ) { if( defined $sub && length($sub) > 2 )
undef $sub;
}
if( defined $sub )
{ {
$res .= substr $sub, 1, length($sub) - 2; $res .= substr $sub, 1, length($sub) - 2;
} }