]> git.imager.perl.org - bse.git/blobdiff - t/t20gen.t
allow use of the new template system from static pages
[bse.git] / t / t20gen.t
index b9147f4621569a21f593f95551b82a2d0c646944..8526990743480e5bffd404dd78bd4beb97ca4842 100644 (file)
@@ -76,11 +76,17 @@ template_test "children_of", $top, <<TEMPLATE, <<EXPECTED;
 <:iterator begin children_of $parent->{id}:><:
 ofchild title:>
 <:iterator end children_of:>
 <:iterator begin children_of $parent->{id}:><:
 ofchild title:>
 <:iterator end children_of:>
+<:-.set myart = articles.getByPkey($parent->{id}):>
+<:-.for a in [ myart.visible_kids ]:>
+<:-= a.title |html :>
+<:.end for-:>
 TEMPLATE
 Three
 Two
 One
 TEMPLATE
 Three
 Two
 One
-
+Three
+Two
+One
 EXPECTED
 
 template_test "allkids_of", $top, <<TEMPLATE, <<EXPECTED;
 EXPECTED
 
 template_test "allkids_of", $top, <<TEMPLATE, <<EXPECTED;