Fix rogue child disconnecting a parent $dbh - no idea how I even missed that
[dbsrgits/DBIx-Class.git] / t / storage / global_destruction.t
index e92a3a6..ae4260a 100644 (file)
@@ -53,6 +53,7 @@ for my $type (qw/PG MYSQL/) {
           }
           else {
             note "Child $$ terminating";
+            undef $DBICTest::FakeSchemaFactory::schema;
             exit 0;
           }