Fix the pure-perl in_global_destruction() emulation under threads

[dbsrgits/DBIx-Class.git] / xt / podcoverage.t

diff --git a/xt/podcoverage.t b/xt/podcoverage.t
index 17bb7ed..2cd6c52 100644 (file)
--- a/xt/podcoverage.t
+++ b/xt/podcoverage.t
@@ -125,6 +125,7 @@ my $exceptions = {
     'DBIx::Class::ResultSource::*'                  => { skip => 1 },
     'DBIx::Class::Storage::Statistics'              => { skip => 1 },
     'DBIx::Class::Storage::DBI::Replicated::Types'  => { skip => 1 },
+    'DBIx::Class::GlobalDestruction'                => { skip => 1 },
     'DBIx::Class::Storage::BlockRunner'             => { skip => 1 }, # temporary
 
 # test some specific components whose parents are exempt below