X-Git-Url: https://git.sur5r.net/?p=i3%2Fi3;a=blobdiff_plain;f=contrib%2Fdump-asy.pl;fp=contrib%2Fdump-asy.pl;h=2c244752695cf645bc1b16adde28c8cf3795f791;hp=c183db338a461a8ac2422be5a995cc900fb72330;hb=c1e622be27ad6695d0bc12b82de71a14b233ecb4;hpb=6cc3a2bfe841d0997b110680af3c32cd19e8f1e2 diff --git a/contrib/dump-asy.pl b/contrib/dump-asy.pl index c183db33..2c244752 100755 --- a/contrib/dump-asy.pl +++ b/contrib/dump-asy.pl @@ -56,7 +56,8 @@ sub dump_node { if (!defined($n->{window})) { $type = $n->{layout}; } - my $name = qq|``$na'' ($type)|; + my $marks = $n->{marks} ? ' [' . join('][', @{$n->{marks}}) . ']' : ''; + my $name = qq|``$na'' ($type)$marks|; print $tmp "TreeNode n" . $n->{id} . " = makeNode(";