Commit 7059196a authored by Leo Gordon's avatar Leo Gordon
Browse files

extend for other schema types

parent e2a13003
......@@ -285,7 +285,7 @@ sub data_dbc {
sub go_figure_dbc {
my ($self, $foo) = @_;
my ($self, $foo, $schema_type) = @_;
if(UNIVERSAL::isa($foo, 'Bio::EnsEMBL::DBSQL::DBConnection')) { # already a DBConnection, return it:
......@@ -307,7 +307,8 @@ sub go_figure_dbc {
unless(ref($foo)) { # maybe it is simply a registry key?
my $dba;
eval {
$dba = Bio::EnsEMBL::Registry->get_DBAdaptor($foo, 'hive'); # We should not assume it is necessarily a Hive database. It would be sufficient just to get a DBConnection from it
$schema_type ||= 'hive';
$dba = Bio::EnsEMBL::Registry->get_DBAdaptor($foo, $schema_type);
};
if(UNIVERSAL::can($dba, 'dbc')) {
return $dba->dbc;
......
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