diff --git a/altree b/altree index f0effe04c99a0c7fe7c01a567ef4db0e0d0400b7..f52bd1b07d4838f3017777182181f479772d9384 100755 --- a/altree +++ b/altree @@ -434,9 +434,10 @@ sub FillQuanti } print STDERR $id, " " ; for (my $i=0; $i< scalar (@{$present_node->{"quanti"}}); $i++) { - print STDERR $present_node->{"quanti"}->[$i]->[0], " "; + print STDERR $present_node->{"quanti"}->[$i]->[0]->[0], " "; } print STDERR "\n"; + print Dumper($present_node->{"quanti"});; } else { my($child); # # print $present_node->{"id"}, " "; #123456