Bug fix of invalid presentation of container's split orientation.

diff --git a/dump-asy.pl b/dump-asy.pl
index 343a39c4b7e0a21e52da7daa8b649524e8f493ac..315dcc6ff76647fdac9befba0abef968ede8f33a 100755 (executable)
--- a/dump-asy.pl
+++ b/dump-asy.pl
@@ -22,7 +22,7 @@ say $tmp "treeLevelStep = 2cm;";
 sub dump_node {
        my ($n, $parent) = @_;
 
-    my $o = ($n->{orientation} == 0 ? "h" : "v");
+    my $o = ($n->{orientation} == 0 ? "u" : ($n->{orientation} == 1 ? "h" : "v"));
     my $w = (defined($n->{window}) ? $n->{window} : "N");
     my $na = $n->{name};
     $na =~ s/#/\\#/g;