Parent Directory
| 
Revision Log
| 
Patch
| revision 1.24, Sat Oct 2 00:01:10 2010 UTC | revision 1.25, Sun Oct 3 23:03:57 2010 UTC | |
|---|---|---|
| # | Line 2136 | Line 2136 |
| 2136 | my $fraction = $opts->{ fraction }; | my $fraction = $opts->{ fraction }; |
| 2137 | my $tip = $opts->{ tip }; | my $tip = $opts->{ tip }; |
| 2138 | ||
| 2139 | if ( defined( $distance ) ) | if ( defined( $distance ) && @nodes == 2 ) |
| 2140 | { | { |
| return $tree if @nodes != 2; | ||
| 2141 | $distance = 0 if $distance < 0; | $distance = 0 if $distance < 0; |
| 2142 | $tree = reroot_newick_at_dist_between_nodes( $tree, @nodes, $distance ) | $tree = reroot_newick_at_dist_between_nodes( $tree, @nodes, $distance ) |
| 2143 | } | } |
|
||||||||
| MCS Webmaster | ViewVC Help |
| Powered by ViewVC 1.0.3 |