Commit 6be1da66 authored by Ian Longden's avatar Ian Longden
Browse files

est now otherfeatures

parent 9923611e
......@@ -920,20 +920,19 @@ sub load_registry_from_db{
print $vegadb." loaded\n" if ($verbose);
}
my @est_dbs = grep { /^[a-z]+_[a-z]+_est_\d+_/ } @dbnames;
my @other_dbs = grep { /^[a-z]+_[a-z]+_otherfeatures_\d+_/ } @dbnames;
for my $est_db ( @est_dbs ) {
my ($species, $num) = ( $est_db =~ /(^[a-z]+_[a-z]+)_est_(\d+)/ );
for my $other_db ( @other_dbs ) {
my ($species, $num) = ( $other_db =~ /(^[a-z]+_[a-z]+)_otherfeatures_(\d+)/ );
my $dba = Bio::EnsEMBL::DBSQL::DBAdaptor->new
( -group => "est",
( -group => "otherfeatures",
-species => $species,
-host => $host,
-user => $user,
-pass => $pass,
-port => $port,
-dbname => $est_db
-dbname => $other_db
);
print $est_db." loaded\n" if ($verbose);
}
......
......@@ -45,7 +45,7 @@ use Bio::EnsEMBL::DBSQL::DBAdaptor;
use Bio::EnsEMBL::Utils::Exception qw(warning throw deprecate stack_trace_dump);
=head2 load_core, load_estgene, load_vega, load_compara, load_pipeline, load_SNP, load_lite
=head2 load_core, load_otherfeatures, load_vega, load_compara, load_pipeline, load_SNP, load_lite
Arg [1] : DBAdaptor with DBConnection alredy attached
Returntype : DBAdaptor;
Exceptions : none
......@@ -122,8 +122,8 @@ sub gen_load{
if($dba->group eq "estgene"){
$config_sub = \&Bio::EnsEMBL::Utils::ConfigRegistry::load_estgene;
}
elsif($dba->group eq "est"){
$config_sub = \&Bio::EnsEMBL::Utils::ConfigRegistry::load_est;
elsif($dba->group eq "otherfeatures"){
$config_sub = \&Bio::EnsEMBL::Utils::ConfigRegistry::load_otherfeatures;
}
elsif($dba->group eq "vega"){
$config_sub = \&Bio::EnsEMBL::Utils::ConfigRegistry::load_vega;
......@@ -283,7 +283,7 @@ sub load_estgene{
load_and_attach_dnadb_to_core(@_);
}
sub load_est{
sub load_otherfeatures{
load_and_attach_dnadb_to_core(@_);
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment