From 7412806df23c7cc40c8da083266eaaf9d3ac8266 Mon Sep 17 00:00:00 2001
From: Gianni Ceccarelli <dakkar@dechirico.(none)>
Date: Sat, 25 Apr 2009 09:39:18 +0200
Subject: added "attach_nodes" function (undocumented for now)

---
 lib/Tree/Template/Declare.pm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/Tree/Template/Declare.pm b/lib/Tree/Template/Declare.pm
index c103615..356c2fd 100644
--- a/lib/Tree/Template/Declare.pm
+++ b/lib/Tree/Template/Declare.pm
@@ -64,11 +64,17 @@ sub _build_group {
                 local $current_node[0]=$node;
                 $_[0]->(caller_args(1));
             }
-            if ($current_node[0]) {
+            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 @_;
+            }
+        },
         name => sub ($) {
             $builder->set_node_name($current_node[0],$_[0]);
             return;
-- 
cgit v1.2.3