Shut down on END instead of DESTROY.

diff --git a/t/BucardoTesting.pm b/t/BucardoTesting.pm
index fcb6026abade32146a540a6e463b809388c666d7..bc85baf4b3aa872fa8835e30dcfbc3ec6475715a 100644 (file)
--- a/t/BucardoTesting.pm
+++ b/t/BucardoTesting.pm
@@ -1260,9 +1260,8 @@ sub empty_test_database {
 
 } ## end of empty_test_database
 
-DESTROY {
-    my $self = shift;
-    $self->shutdown_cluster($_) for keys %pgver;
+END {
+    __PACKAGE__->shutdown_cluster($_) for keys %pgver;
 }
 
 sub shutdown_cluster {