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)

---
 t/06-code.t | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 't')

diff --git a/t/06-code.t b/t/06-code.t
index a24427d..959fce2 100644
--- a/t/06-code.t
+++ b/t/06-code.t
@@ -21,9 +21,11 @@ sub make_item {
 sub make_list {
     my (@items)=@_;
 
+    my @item_nodes=map {make_item(@$_)} @items;
+
     return node {
         name 'list';
-        make_item(@$_) for @items;
+        attach_nodes @item_nodes;
     };
 }
 
-- 
cgit v1.2.3