Bug 21738: make call of CanBookBeReserved more safe

[koha.git] / C4 / TmplToken.pm

diff --git a/C4/TmplToken.pm b/C4/TmplToken.pm
index 05648ce..045269b 100644 (file)
--- a/C4/TmplToken.pm
+++ b/C4/TmplToken.pm
@@ -32,7 +32,6 @@ This is a class representing a token scanned from an HTML::Template .tmpl file.
 
 =cut
 
-our $VERSION = 3.07.00.049;
 
 
 sub new {
@@ -92,7 +91,7 @@ sub set_children {
 # FIXME: DIRECTIVE is not necessarily TMPL_VAR !!
 sub parameters_and_fields {
     my $this = shift;
-    return map { $_->type == C4::TmplTokenType::DIRECTIVE? $_:
+    return map { $_->type == C4::TmplTokenType::DIRECTIVE() ? $_:
                ($_->type == C4::TmplTokenType::TAG
                        && $_->string =~ /^<input\b/is)? $_: ()}
            @{$this->{'_kids'}};