[Bioperl-guts-l] bioperl-live/Bio Taxon.pm,1.8,1.9

Senduran Balasubramaniam sendu at dev.open-bio.org
Tue Jun 19 02:46:55 EDT 2007


Update of /home/repository/bioperl/bioperl-live/Bio
In directory dev.open-bio.org:/tmp/cvs-serv12664/Bio

Modified Files:
	Taxon.pm 
Log Message:
revert last change: its not supposed to access the db to find descendents

Index: Taxon.pm
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/Bio/Taxon.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** Taxon.pm	19 Jun 2007 00:57:26 -0000	1.8
--- Taxon.pm	19 Jun 2007 06:46:53 -0000	1.9
***************
*** 540,548 ****
  =cut
  
! sub each_Descendent {
!     my ($self) = shift;
!     my $db ||= $self->db_handle || return;
!     return $db->each_Descendent($self);
! }
  
  =head2 get_Children_Nodes
--- 540,544 ----
  =cut
  
! # implemented by Bio::Tree::Node
  
  =head2 get_Children_Nodes



More information about the Bioperl-guts-l mailing list