Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 6679: (follow-up) fix 9 perlcritic violations in C4/TmplTokenType.pm

Browse source 
Signed-off-by: Bernardo Gonzalez Kriegel <bgkriegel@gmail.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

Signed-off-by: Mark Tompsett <mtompset@hotmail.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

Signed-off-by: Brendan A Gallagher <brendan@bywatersolutions.com>
This commit is contained in:
Jonathan Druart 2014-12-09 09:48:58 +01:00 committed by Brendan A Gallagher
parent f2eb968145
commit 8ca35dc7a9
2 changed files with 10 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
C4/TmplToken.pm
View file

@ -92,7 +92,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'}};