Bug fix of invalid presentation of container's split orientation.
This commit is contained in:
parent
161afa3d01
commit
f73252431b
|
@ -22,7 +22,7 @@ say $tmp "treeLevelStep = 2cm;";
|
||||||
sub dump_node {
|
sub dump_node {
|
||||||
my ($n, $parent) = @_;
|
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 $w = (defined($n->{window}) ? $n->{window} : "N");
|
||||||
my $na = $n->{name};
|
my $na = $n->{name};
|
||||||
$na =~ s/#/\\#/g;
|
$na =~ s/#/\\#/g;
|
||||||
|
|
Loading…
Reference in New Issue