Bio/Taxonomy/Node.pm

   1 # $Id$
   2 #
   3 # BioPerl module for Bio::Taxonomy::Node
   4 #
   5 # Cared for by Jason Stajich <jason-at-bioperl-dot-org>
   6 #
   7 # Copyright Jason Stajich
   8 #
   9 # You may distribute this module under the same terms as perl itself
  10
  11 # POD documentation - main docs before the code
  12
  13 =head1 NAME
  14
  15 Bio::Taxonomy::Node - A node in a represented taxonomy
  16
  17 =head1 SYNOPSIS
  18
  19   use Bio::Taxon;
  20   # This module has been renamed Bio::Taxon - use that instead
  21
  22 =head1 DESCRIPTION
  23
  24 This module has been renamed Bio::Taxon - use that instead.
  25
  26 =head1 FEEDBACK
  27
  28 =head2 Mailing Lists
  29
  30 User feedback is an integral part of the evolution of this and other
  31 Bioperl modules. Send your comments and suggestions preferably to
  32 the Bioperl mailing list.  Your participation is much appreciated.
  33
  34   bioperl-l@bioperl.org                  - General discussion
  35   http://bioperl.org/wiki/Mailing_lists  - About the mailing lists
  36
  37 =head2 Reporting Bugs
  38
  39 Report bugs to the Bioperl bug tracking system to help us keep track
  40 of the bugs and their resolution. Bug reports can be submitted via
  41 the web:
  42
  43   http://bugzilla.open-bio.org/
  44
  45 =head1 AUTHOR - Jason Stajich
  46
  47 Email jason-at-bioperl-dot-org
  48
  49 =head1 CONTRIBUTORS
  50
  51 Juguang Xiao,     juguang@tll.org.sg
  52 Gabriel Valiente, valiente@lsi.upc.edu
  53 Sendu Bala,       bix@sendu.me.uk
  54
  55 =head1 APPENDIX
  56
  57 The rest of the documentation details each of the object methods.
  58 Internal methods are usually preceded with a _
  59
  60 =cut
  61
  62 package Bio::Taxonomy::Node;
  63 use strict;
  64
  65
  66 use base qw(Bio::Taxon);
  67
  68 sub new {
  69     my ($class, @args) = @_;
  70     my $self = $class->SUPER::new(@args);
  71     $self->warn("This module has been renamed Bio::Taxon - use that instead");
  72     return $self;
  73 }
  74
  75 1;