diff --git a/modules/t/MultiTestDB.pm b/modules/t/MultiTestDB.pm index 44a142b0f803a58d3e028e2faba07c5d8c67329a..0682909a12da8746d9a611a96b98eb7a06fdf0a9 100644 --- a/modules/t/MultiTestDB.pm +++ b/modules/t/MultiTestDB.pm @@ -654,6 +654,7 @@ sub cleanup { print STDERR "Dropping db $dbname \n"; $db->do("DROP database $dbname"); + $db->disconnect; } my $conf_file = $self->curr_dir . $self->species . $FROZEN_CONF_EXT;