[Bioperl-guts-l] bioperl-live/Bio/SeqFeature Annotated.pm, 1.26,
1.27
Brian Osborne
bosborne at pub.open-bio.org
Mon Nov 7 18:12:41 EST 2005
Update of /home/repository/bioperl/bioperl-live/Bio/SeqFeature
In directory pub.open-bio.org:/tmp/cvs-serv24681/Bio/SeqFeature
Modified Files:
Annotated.pm
Log Message:
Remove id, test passes.
Index: Annotated.pm
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/Bio/SeqFeature/Annotated.pm,v
retrieving revision 1.26
retrieving revision 1.27
diff -C2 -d -r1.26 -r1.27
*** Annotated.pm 9 May 2005 09:01:50 -0000 1.26
--- Annotated.pm 7 Nov 2005 23:12:39 -0000 1.27
***************
*** 49,54 ****
of the Bioperl mailing lists. Your participation is much appreciated.
! bioperl-l at bioperl.org - General discussion
! http://bio.perl.org/MailList.html - About the mailing lists
=head2 Reporting Bugs
--- 49,54 ----
of the Bioperl mailing lists. Your participation is much appreciated.
! bioperl-l at bioperl.org - General discussion
! http://bio.perl.org/MailList.html - About the mailing lists
=head2 Reporting Bugs
***************
*** 88,92 ****
use URI::Escape;
! @ISA = qw(Bio::Root::Root Bio::SeqFeatureI Bio::AnnotatableI Bio::FeatureHolderI);
######################################
--- 88,93 ----
use URI::Escape;
! @ISA = qw(Bio::Root::Root Bio::SeqFeatureI Bio::AnnotatableI
! Bio::FeatureHolderI);
######################################
***************
*** 122,128 ****
sub _initialize {
my ($self, at args) = @_;
! my (
! $start, $end, $strand, $frame, $phase, $score,
! $name, $id, $annot, $location,
$display_name, #deprecate
$seq_id, $type,$source
--- 123,128 ----
sub _initialize {
my ($self, at args) = @_;
! my ($start, $end, $strand, $frame, $phase, $score,
! $name, $annot, $location,
$display_name, #deprecate
$seq_id, $type,$source
More information about the Bioperl-guts-l
mailing list