← Back to branch summary

~ubuntu-branches/ubuntu/raring/bioperl/raring

« back to all changes in this revision

Viewing changes to Bio/DB/Universal.pm

  • Committer: Bazaar Package Importer
  • Author(s): Charles Plessy
  • Date: 2008-03-18 14:44:57 UTC
  • mfrom: (4 hardy)
  • mto: This revision was merged to the branch mainline in revision 6.
  • Revision ID: james.westby@ubuntu.com-20080318144457-1jjoztrvqwf0gruk
http://bugs.debian.org/448890
* debian/control:
  - Removed MIA Matt Hope (dopey) from the Uploaders field.
    Thank you for your work, Matt. I hope you are doing well.
  - Downgraded some recommended package to the 'Suggests' priority,
    according to the following discussion on Upstream's mail list.
    http://bioperl.org/pipermail/bioperl-l/2008-March/027379.html
    (Closes: #448890)
* debian/copyright converted to machine-readable format.

Show diffs side-by-side

added added

removed removed

Lines of Context:
Bio/DB/Universal.pm
75
75
=head2 Reporting Bugs
76
76
 
77
77
Report bugs to the Bioperl bug tracking system to help us keep track
78
 
the bugs and their resolution.  Bug reports can be submitted via email
79
 
or the web:
 
78
the bugs and their resolution.  Bug reports can be submitted via the
 
79
web:
80
80
 
81
 
  bioperl-bugs@bio.perl.org
82
 
  http://bugzilla.bioperl.org/
 
81
  http://bugzilla.open-bio.org/
83
82
 
84
83
=head1 AUTHOR - Ewan Birney
85
84
 
86
85
Email birney@ebi.ac.uk
87
86
 
88
 
Describe contact details here
89
 
 
90
87
=head1 APPENDIX
91
88
 
92
 
The rest of the documentation details each of the object methods. Internal methods are usually preceded with a _
 
89
The rest of the documentation details each of the object
 
90
methods. Internal methods are usually preceded with a _
93
91
 
94
92
=cut
95
93
 
98
96
 
99
97
 
100
98
package Bio::DB::Universal;
101
 
use vars qw(@ISA);
102
99
use strict;
103
100
 
104
101
# Object preamble - inherits from Bio::Root::Root
105
102
 
106
 
use Bio::Root::Root;
107
 
use Bio::DB::RandomAccessI;
108
103
 
109
104
use Bio::DB::GenBank;
110
105
use Bio::DB::SwissProt;
111
106
use Bio::DB::EMBL;
112
107
 
113
108
 
114
 
@ISA = qw(Bio::DB::RandomAccessI Bio::Root::Root);
 
109
use base qw(Bio::DB::RandomAccessI Bio::Root::Root);
115
110
# new() can be inherited from Bio::Root::Root
116
111
 
117
112
sub new {
244
239
   $self->{'db_hash'}->{$name} = $database;
245
240
}
246
241
 
247
 
 
 
242
1;