additional tweak to regex to pickup more labels
This commit is contained in:
parent
97f2475d8e
commit
ccd865f353
1 changed files with 1 additions and 1 deletions
2
t/i18n.t
2
t/i18n.t
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue