зеркало из https://github.com/mozilla/pjs.git
Perl 5.005_03 compatability: the precedence of the not and comma operators changed at some point, so disambiguate this usage.
This commit is contained in:
Родитель
76c246b0ac
Коммит
8121837c6b
|
@ -60,7 +60,7 @@ sub expand {
|
||||||
# what we have here is a potential Template::Document
|
# what we have here is a potential Template::Document
|
||||||
# let's try to evaluate it
|
# let's try to evaluate it
|
||||||
$document = eval $string;
|
$document = eval $string;
|
||||||
$self->assert(not(defined($@)), 1, "Error loading compiled template: $@");
|
$self->assert((not defined($@)), 1, "Error loading compiled template: $@");
|
||||||
} else { # $type eq 'TemplateToolkit'
|
} else { # $type eq 'TemplateToolkit'
|
||||||
# what we have is a raw string
|
# what we have is a raw string
|
||||||
$document = \$string;
|
$document = \$string;
|
||||||
|
|
Загрузка…
Ссылка в новой задаче