diff options
Diffstat (limited to 't/01-basic.t')
| -rw-r--r-- | t/01-basic.t | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/t/01-basic.t b/t/01-basic.t index fe205e1..c6b1e8a 100644 --- a/t/01-basic.t +++ b/t/01-basic.t @@ -12,6 +12,7 @@ my $tree=tree { node { name 'coso1'; attribs name => 'coso_1'; + attribs other => 'some'; }; node { name 'coso2'; @@ -19,7 +20,9 @@ my $tree=tree { }; }; -diag $_ for @{$tree->draw_ascii_tree()}; is_deeply($tree->tree_to_lol(), [['coso1'],['coso2'],'root'], 'built the tree'); +is_deeply(($tree->daughters)[0]->attributes, + {name => 'coso_1', other => 'some'}, + 'attributes'); |