X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=blobdiff_plain;f=t%2F52leaks.t;h=c7af7013b2a8f0a638cde80d7d3473249fe2a303;hp=b61856d676bd1983e642344a988acd256a68a26f;hb=439a7283a981f27a56e745d99e456fc50a5a018f;hpb=7b87b77c04e07cfea1103dba8ecbd3f219e949d2

diff --git a/t/52leaks.t b/t/52leaks.t
index b61856d..c7af701 100644
--- a/t/52leaks.t
+++ b/t/52leaks.t
@@ -443,6 +443,10 @@ for my $addr (keys %$weak_registry) {
     # T::B 2.0 has result objects and other fancyness
     delete $weak_registry->{$addr};
   }
+  elsif ($names =~ /^Class::Struct/m) {
+    # remove this when Path::Class is gone, what a crock of shit
+    delete $weak_registry->{$addr};
+  }
   elsif ($names =~ /^Hash::Merge/m) {
     # only clear one object of a specific behavior - more would indicate trouble
     delete $weak_registry->{$addr}