Bio::EnsEMBL::Compara Taxon
SummaryIncluded librariesPackage variablesSynopsisDescriptionGeneral documentationMethods
Toolbar
WebCvsRaw content
Summary
Taxon - DESCRIPTION of Object
Package variables
No package variables defined.
Included modules
Bio::Species
Inherit
Bio::Species
Synopsis
Description
Methods
adaptorDescriptionCode
dbIDDescriptionCode
ncbi_taxidDescriptionCode
taxon_idDescriptionCode
validate_species_nameDescriptionCode
Methods description
adaptorcode    nextTop
 Title   : adaptor
Usage :
Function: give the adaptor if known
Example :
Returns :
Args :
dbIDcodeprevnextTop
 Title   : dbID
Usage :
Function: get/set the dbID (taxon_id) of the taxon
Example :
Returns :
Args :
ncbi_taxidcodeprevnextTop
 Title   : ncbi_taxid
Usage :
Function: get/set the ncbi_taxid of the taxon
Example :
Returns : An integer
Args :
taxon_idcodeprevnextTop
 Title   : taxon_id
Usage :
Function: get/set the taxon_id of the taxon
Example :
Returns : An integer
Args :
validate_species_namecodeprevnextTop
 Title   : validate_species_name
Usage :
Function: override the inherited method to disable all
species name checking since some swissprot species
are not valid by the Bioperl definition
e.g. SWISSPROT:APV1_DRONO has species novae-hollandiae
and the - causes this function to throw an exception
Example :
Returns : 1
Args :
Methods code
adaptordescriptionprevnextTop
sub adaptor {
   my ($self, $value) = @_;

   if (defined $value) {
      $self->{'_adaptor'} = $value;
   }

   return $self->{'_adaptor'};
}
dbIDdescriptionprevnextTop
sub dbID {
  my ($self,$value) = @_;

  return $self->ncbi_taxid($value);
}
ncbi_taxiddescriptionprevnextTop
sub ncbi_taxid {
  my ($self,$value) = @_;
  
  # tricks for bioperl-07/bioperl-1-0-0 compliancy
bless $self, "Bio::Species"; if ($self->can("ncbi_taxid")) { # when using bioperl-1-0-0 and later
if (defined $value) { $self->ncbi_taxid($value); $self->{'_ncbi_taxid'} = $self->ncbi_taxid; } } else { # when using bioperl-07
if (defined $value) { $self->{'_ncbi_taxid'} = $value; } } bless $self, "Bio::EnsEMBL::Compara::Taxon"; return $self->{'_ncbi_taxid'};
}
taxon_iddescriptionprevnextTop
sub taxon_id {
  my ($self,$value) = @_;
  
  $self->warn("Taxon->taxon_id is a deprecated method!
Calling Taxon->ncbi_taxid instead!");

  if (defined $value) {
    return $self->ncbi_taxid($value);
  }

  return $self->ncbi_taxid;
}
validate_species_namedescriptionprevnextTop
sub validate_species_name {
  my( $self, $string ) = @_;
  return 1;
}
1;
}
General documentation
CONTACTTop
 Abel Ureta-Vidal <abel@ebi.ac.uk>
APPENDIXTop
The rest of the documentation details each of the object methods. Internal methods are usually preceded with a _