}
}
- # if this is the menu.pl file
- if ($file eq 'menu.pl') {
- foreach my $item (@menufiles) {
- &scanmenu("$basedir/$item");
- }
- }
-
- if ($file eq 'menunew.pl') {
- foreach my $item (@menufiles) {
- &scanmenu("$basedir/$item");
- print "." if $opt_v;
- }
- }
-
$file =~ s/\.pl//;
foreach my $text (keys %$missing) {
}
}
- my ($found) = /locale->text.*?\(/;
+ my ($found) = / (?: locale->text | \b t8 ) \b .*? \(/x;
$postmatch = "$'";
if ($found) {