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 =~ /^['"]/ )
{
while( defined $sub )
while( defined $sub && length($sub) > 0 )
{
( $sub, $code ) = extract_delimited($code, q{'"}, q{\s*(?:\.\.\s*)?});
if( length($sub) < 1 ) {
undef $sub;
}
if( defined $sub )
if( defined $sub && length($sub) > 2 )
{
$res .= substr $sub, 1, length($sub) - 2;
}