From 534a6ec2b8d95330c6de5d0040c924f8363c11f2 Mon Sep 17 00:00:00 2001
From: Gianni Ceccarelli <dakkar@dechirico.(none)>
Date: Thu, 23 Apr 2009 14:57:25 +0200
Subject: new tests

---
 lib/Tree/Template/Declare.pm          | 2 +-
 lib/Tree/Template/Declare/DAG_Node.pm | 2 +-
 lib/Tree/Template/Declare/LibXML.pm   | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib')

diff --git a/lib/Tree/Template/Declare.pm b/lib/Tree/Template/Declare.pm
index 118fcea..8e24215 100644
--- a/lib/Tree/Template/Declare.pm
+++ b/lib/Tree/Template/Declare.pm
@@ -36,7 +36,7 @@ sub _build_group {
         if ($builder_pkg=~m{\A \+(\w+) \z}smx) {
             $builder_pkg="Tree::Template::Declare::$1";
         }
-        eval "require $builder_pkg";
+        eval "require $builder_pkg"; ## no critic
         croak "Can't load $builder_pkg: $@" if $@;
 
         if ($builder_pkg->can('new')) {
diff --git a/lib/Tree/Template/Declare/DAG_Node.pm b/lib/Tree/Template/Declare/DAG_Node.pm
index 2736a5f..3f5fc8a 100644
--- a/lib/Tree/Template/Declare/DAG_Node.pm
+++ b/lib/Tree/Template/Declare/DAG_Node.pm
@@ -7,7 +7,7 @@ sub new {
     my ($class,$node_class)=@_;
     $node_class||='Tree::DAG_Node';
 
-    eval "require $node_class";
+    eval "require $node_class"; ## no critic
     croak "Can't load $node_class: $@" if $@;
 
     return bless {nc=>$node_class},$class;
diff --git a/lib/Tree/Template/Declare/LibXML.pm b/lib/Tree/Template/Declare/LibXML.pm
index 066d2e4..bc1fdef 100644
--- a/lib/Tree/Template/Declare/LibXML.pm
+++ b/lib/Tree/Template/Declare/LibXML.pm
@@ -22,7 +22,7 @@ sub _munge_exports {
         text_node => sub($) {
             if ($current_node_aref->[0]) {
                 $current_node_aref->[0]->appendTextNode($_[0]);
-            },
+            }
         },
     };
 }
-- 
cgit v1.2.3