diff options
author | dakkar <dakkar@thenautilus.net> | 2009-04-25 09:51:44 +0200 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2009-04-25 09:51:44 +0200 |
commit | 99559b1665f27950e33ddd3eb7dd9bc9c61e12db (patch) | |
tree | e757031b3f2e85c9ebe47a742ad4cae368c81705 /lib/Tree/Template/Declare.pm | |
parent | added "attach_nodes" function (undocumented for now) (diff) | |
download | Tree-Template-Declare-99559b1665f27950e33ddd3eb7dd9bc9c61e12db.tar.gz Tree-Template-Declare-99559b1665f27950e33ddd3eb7dd9bc9c61e12db.tar.bz2 Tree-Template-Declare-99559b1665f27950e33ddd3eb7dd9bc9c61e12db.zip |
passes critic, but changes for "attach_nodes" are wrong
Diffstat (limited to 'lib/Tree/Template/Declare.pm')
-rw-r--r-- | lib/Tree/Template/Declare.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/Tree/Template/Declare.pm b/lib/Tree/Template/Declare.pm index 356c2fd..38f933c 100644 --- a/lib/Tree/Template/Declare.pm +++ b/lib/Tree/Template/Declare.pm @@ -64,15 +64,17 @@ sub _build_group { local $current_node[0]=$node; $_[0]->(caller_args(1)); } - if ($current_node[0] && !defined(wantarray)) { + if ($current_node[0] && !defined wantarray) { $builder->add_child_node($current_node[0],$node); } return $node; }, attach_nodes => sub { if ($current_node[0]) { - $builder->add_child_node($current_node[0],$_) - for @_; + for my $newnode (@_) { + $builder->add_child_node($current_node[0], + $newnode); + } } }, name => sub ($) { |