Fix t/storage/reconnect.t when run as root
[dbsrgits/DBIx-Class.git] / t / storage / global_destruction.t
index 629f7b7..ae4260a 100644 (file)
@@ -9,6 +9,8 @@ use DBIx::Class::Optional::Dependencies ();
 use lib qw(t/lib);
 use DBICTest;
 
+plan skip_all => 'Test segfaults on Win32' if $^O eq 'MSWin32';
+
 for my $type (qw/PG MYSQL/) {
 
   SKIP: {
@@ -51,6 +53,7 @@ for my $type (qw/PG MYSQL/) {
           }
           else {
             note "Child $$ terminating";
+            undef $DBICTest::FakeSchemaFactory::schema;
             exit 0;
           }