additional tweak to regex to pickup more labels

This commit is contained in:
Colin Kuskie 2005-12-06 00:49:20 +00:00
parent 97f2475d8e
commit ccd865f353

View file

@ -31,7 +31,7 @@ initialize(); # this line is required
my $digits = qr/(\d+)/;
my $bareword = qr/(\w+)/;
my $quotelike = qr/((['"])($bareword\s*)+(['"]))/;
my $quotelike = qr/((['"])([^'"\s]+\s*)+(['"]))/;
my $sub_args = qr/(($quotelike|$digits)(,\s*)?)+/;
my $subroutine = qr/
WebGUI::International::get