fixed

1513aecf · Web Admin · 5c611bde · 1513aecf
Commit 1513aecf authored Jul 25, 2005 by Web Admin
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

modules/Bio/EnsEMBL/Registry.pm modules/Bio/EnsEMBL/Registry.pm +1 -1

No files found.
--- a/modules/Bio/EnsEMBL/Registry.pm
+++ b/modules/Bio/EnsEMBL/Registry.pm
@@ -728,7 +728,7 @@ sub set_disconnect_when_inactive{
 =cut

 sub disconnect_all {
-  foreach my $dba ( get_all_DBAdaptors() ){
+  foreach my $dba ( @{get_all_DBAdaptors()||[]} ){
    my $dbc = $dba->dbc;
    #disconnect if connected
    $dbc->disconnect_if_idle() if $dbc->connected();