Skip to content
Snippets Groups Projects
Commit abf6bca7 authored by Andy Yates's avatar Andy Yates
Browse files

If it was already a test db we were dumping then the user and test_db prefix...

If it was already a test db we were dumping then the user and test_db prefix got added onto the species name.
parent 2dc28bec
No related branches found
No related tags found
No related merge requests found
...@@ -486,7 +486,7 @@ sub _setup_dir { ...@@ -486,7 +486,7 @@ sub _setup_dir {
my ($self, $db) = @_; my ($self, $db) = @_;
my @path = ($self->opts()->{directory}); my @path = ($self->opts()->{directory});
if($self->opts()->{testcompatible}) { if($self->opts()->{testcompatible}) {
if( $db =~ /^([a-zA-Z0-9_]+)_([a-z]+)_\d+/) { if( $db =~ /^(?:\w+_test_db_)?([a-zA-Z0-9_]+)_([a-z]+)_\d+/) {
push(@path, $1, $2); push(@path, $1, $2);
} }
else { else {
......
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