[Bioperl-l] Unwise elimination of nodes inB:T:Node::remove_Descendent?

[Mark A. Jensen]

CORRECTION: please patch the previous post...

...
> code above. If you look at the tree, the nodes he really wants to keep are
- the leaves [A,B,E], *plus* the internal nodes [x,y,z]; that is...
+ the leaves [A,B,E], *plus* the internal nodes [x,<root>,z]; that is...
> 
- $tree->splice(-keep_id=>[A,B,E,x,'y',z])
+ $tree->splice(-keep_id=>[A,B,E,x,<root>,z])
> $tree->total_branch_length
> 
> doesn't throw and returns 25, which is correct. 

sorry, it's late ... MAJ