Commit 9f5c8c6e authored by Andy Yates's avatar Andy Yates
Browse files

Forcing DBNAME to be a required param.

parent 357644ff
......@@ -125,16 +125,19 @@ sub new {
my $self = bless {}, $class;
my ( $is_multispecies, $species, $species_id, $group, $con, $dnadb,
$no_cache )
$no_cache, $dbname )
= rearrange( [
'MULTISPECIES_DB', 'SPECIES', 'SPECIES_ID', 'GROUP',
'DBCONN', 'DNADB', 'NO_CACHE'
'DBCONN', 'DNADB', 'NO_CACHE', 'DBNAME'
],
@args
);
if ( defined($con) ) { $self->dbc($con) }
else {
if(! defined $dbname) {
throw "-DBNAME is a required parameter when creating a DBAdaptor";
}
$self->dbc( new Bio::EnsEMBL::DBSQL::DBConnection(@args) );
}
......
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