From: Peter Rabbitson <ribasushi@cpan.org>
Date: Sat, 7 Sep 2013 16:05:38 +0000 (+0100)
Subject: Fix 79061be1 not working under -T
X-Git-Tag: v0.08260~156
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=562a12297f2e3353a8fb9ed9c0b5ad43c938d3a1;p=dbsrgits%2FDBIx-Class.git

Fix 79061be1 not working under -T
---

diff --git a/t/02_standalone_test_classes.t b/t/02_standalone_test_classes.t
index 55df0df..48c70ac 100644
--- a/t/02_standalone_test_classes.t
+++ b/t/02_standalone_test_classes.t
@@ -21,7 +21,7 @@ find({
       }
 
       local $SIG{__WARN__} = sub { warn @_ unless $_[0] =~ /\bdeprecated\b/i };
-      require( ($_ =~ /(.+)/)[0] ); # untaint
+      require( ( $_ =~ m| t/lib/ (.+) |x )[0] ); # untaint and strip lib-part (. is unavailable under -T)
       exit 0;
     }