vitalif
/
VMXTemplate
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

, is now alias for =>

databind
vitalif 2011-01-13 23:39:53 +00:00 committed by Vitaliy Filippov
parent 71b614df28
commit 3b723179b3
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
VMX/Template.pm
View File

@ -787,17 +787,17 @@ sub compile_expression
while (defined($e = $self->compile_expression($a, \$a))) while (defined($e = $self->compile_expression($a, \$a)))
{ {
push @a, $e; push @a, $e;
if ($a =~ /^\s*\)/so) if ($a =~ /^\s*((,|=>)\s*)?\)/so)
{ {
last; last;
} }
elsif ($a !~ s/^\s*,//so) elsif ($a !~ s/^\s*(,|=>)//so)
{ {
$self->warning("Unexpected token: '$a' in $f() parameter list"); $self->warning("Unexpected token: '$a' in $f() parameter list");
return undef; return undef;
} }
} }
if ($a !~ s/^\s*\)\s*//so) if ($a !~ s/^\s*((,|=>)\s*)?\)\s*//so)
{ {
$self->warning("Unexpected token: '$a' in the end of $f() parameter list"); $self->warning("Unexpected token: '$a' in the end of $f() parameter list");
return undef; return undef;