[Bio] / FigKernelPackages / gjonewicklib.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/gjonewicklib.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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      }      }

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3