[Bioperl-l] bioperl-db: methods to get sequence version

[Heikki Lehvaslaiho]

I noticed that the call to get the sequence version integer is different in
bioperl-db compared to bioperl-live. The following code illustrates the
situation:

   # get sequence version
   my $seq_version;
   $seq_version = $seq->version  if $seq->isa('Bio::DB::Seq');
   $seq_version = $seq->seq_version if $seq->isa('Bio::Seq::RichSeq');

Bio::DB::Seq uses seq_version() to get acc.version string which is a bit
confusing.

It would be great if someone could find time to make Bio::DB::Seq
to inherit from Bio::Seq::RichSeqI and go through the bioperl-db code base
to make sure the usage of methods is consistent.

This would be a good chance for a newby with cvs access to see how
bioperl-db works.

	-Heikki


-- 
______ _/      _/_____________________________________________________
      _/      _/                      http://www.ebi.ac.uk/mutations/
     _/  _/  _/  Heikki Lehvaslaiho          heikki@ebi.ac.uk
    _/_/_/_/_/  EMBL Outstation, European Bioinformatics Institute
   _/  _/  _/  Wellcome Trust Genome Campus, Hinxton
  _/  _/  _/  Cambs. CB10 1SD, United Kingdom
     _/      Phone: +44 (0)1223 494 644   FAX: +44 (0)1223 494 468
___ _/_/_/_/_/________________________________________________________