Fix depth computation

git-svn-id: svn+ssh://imag/users/huron/danjean/svnroot/claire/altree/trunk@451 cf695345-040a-0410-a956-b889e835fe2e

progs/altree

@@ -678,11 +678,12 @@ sub computeTreeStructure($) {
 		push @leafList, $node;
 	    }
 	}
-	if (scalar(@childNodeList) > 1) {
-	    $depth++;
-	}
 	if (scalar(@childNodeList) > 0) {
-	    $computeLeaf->(\@childNodeList, $depth);
+	    my $rec_depth=$depth;
+	    if (scalar(@childNodeList) > 1) {
+		$rec_depth++;
+	    }
+	    $computeLeaf->(\@childNodeList, $rec_depth);
 	}
 	foreach my $node (@leafList) {
 	    push @leaf_refs, $node;