build: properly handle i18n tags with whitespace strip tokens in i18n-scan.pl

diff --git a/build/i18n-scan.pl b/build/i18n-scan.pl
index 9edb529ef62e9e6750f92a751dd19972efafb4d3..8c01a99c4fd32128648d4abec28ce1cbd559c5e6 100755 (executable)
--- a/build/i18n-scan.pl
+++ b/build/i18n-scan.pl
@@ -72,7 +72,7 @@ if( open F, "find @ARGV -type f '(' -name '*.htm' -o -name '*.lua' ')' |" )
 
                        $text = $raw;
 
-                       while( $text =~ s/ ^ .*? <% [:_] -? /<%/sgx )
+                       while( $text =~ s/ ^ .*? <% -? [:_] /<%/sgx )
                        {
                                ( my $code, $text ) = extract_tagged($text, '<%', '%>');