contrib: update i18n-scan.pl script

This commit is contained in:
Matthias Schiffer 2018-02-23 13:35:21 +01:00
parent 88789b1536
commit f558279137
No known key found for this signature in database
GPG Key ID: 16EF3F64CB201D9C

View File

@ -48,7 +48,7 @@ if( open F, "find @ARGV -type f '(' -name '*.html' -o -name '*.lua' ')' |" )
my $text = $raw; my $text = $raw;
while( $text =~ s/ ^ .*? (?:translate|translatef|i18n|_) [\n\s]* \( /(/sgx ) while( $text =~ s/ ^ .*? (?:translate|translatef|_) [\n\s]* \( /(/sgx )
{ {
( my $code, $text ) = extract_bracketed($text, q{('")}); ( my $code, $text ) = extract_bracketed($text, q{('")});