X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=blobdiff_plain;f=t%2Flib%2FDBICTest.pm;h=85e5ee468f440bbd79b881e4d621090b03238af5;hp=953b2494200057f5cb42c2d02ef2a65cd7c5b16a;hb=d12d82729445072356504a0bfe4169991c4ea92a;hpb=e66002835945589b7174d524ba5add64e714abd2

diff --git a/t/lib/DBICTest.pm b/t/lib/DBICTest.pm
index 953b249..85e5ee4 100644
--- a/t/lib/DBICTest.pm
+++ b/t/lib/DBICTest.pm
@@ -112,6 +112,8 @@ sub _database {
 }
 
 sub __mk_disconnect_guard {
+  return if $] == '5.013006'; # leaks handles, delaying DESTROY, can't work right
+
   my $db_file = shift;
   return unless -f $db_file;