diff --git a/modules/Bio/EnsEMBL/Test/MultiTestDB.pm b/modules/Bio/EnsEMBL/Test/MultiTestDB.pm index c51e297a0267d3a223edb90cbb4fb352572e4c79..0467b67249de1241a7cdf3f198ef04bf3e3a8bf2 100644 --- a/modules/Bio/EnsEMBL/Test/MultiTestDB.pm +++ b/modules/Bio/EnsEMBL/Test/MultiTestDB.pm @@ -781,7 +781,11 @@ sub create_db_name { # Create a unique name using host and date / time info my $db_name = sprintf( '%s_test_db_%s_%s_%s_%s', - ( exists $ENV{'LOGNAME'} ? $ENV{'LOGNAME'} : $ENV{'USER'} ), + ( + exists $ENV{'ENSEMBL_TESTDB_PREFIX'} ? $ENV{'ENSEMBL_TESTDB_PREFIX'} + : exists $ENV{'LOGNAME'} ? $ENV{'LOGNAME'} + : $ENV{'USER'} + ), $species, $dbtype, $date, $time ); if (my $path = $self->_db_path($self->dbi_connection)) {