diff options
author | Gianni Ceccarelli <dakkar@dechirico.(none)> | 2009-04-23 15:50:15 +0200 |
---|---|---|
committer | Gianni Ceccarelli <dakkar@dechirico.(none)> | 2009-04-23 15:50:15 +0200 |
commit | 5baf431cd43d7932f9a21c5d67f74c04409f90a3 (patch) | |
tree | 4f3c765e589dc3d2b508eb9327bbada9368a751e /lib/Tree/Template/Declare.pm | |
parent | new tests (diff) | |
download | Tree-Template-Declare-5baf431cd43d7932f9a21c5d67f74c04409f90a3.tar.gz Tree-Template-Declare-5baf431cd43d7932f9a21c5d67f74c04409f90a3.tar.bz2 Tree-Template-Declare-5baf431cd43d7932f9a21c5d67f74c04409f90a3.zip |
passes critic
Diffstat (limited to 'lib/Tree/Template/Declare.pm')
-rw-r--r-- | lib/Tree/Template/Declare.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Tree/Template/Declare.pm b/lib/Tree/Template/Declare.pm index 8e24215..c103615 100644 --- a/lib/Tree/Template/Declare.pm +++ b/lib/Tree/Template/Declare.pm @@ -31,13 +31,13 @@ sub _build_group { my $builder=$args->{builder}; - if (!ref($builder)) { + if (! ref $builder) { my $builder_pkg=$builder; if ($builder_pkg=~m{\A \+(\w+) \z}smx) { $builder_pkg="Tree::Template::Declare::$1"; } - eval "require $builder_pkg"; ## no critic - croak "Can't load $builder_pkg: $@" if $@; + eval "require $builder_pkg" ## no critic (ProhibitStringyEval) + or croak "Can't load $builder_pkg: $@"; if ($builder_pkg->can('new')) { $builder=$builder_pkg->new(); |