Fix 79061be1 not working under -T
Peter Rabbitson [Sat, 7 Sep 2013 16:05:38 +0000 (17:05 +0100)]
t/02_standalone_test_classes.t

index 55df0df..48c70ac 100644 (file)
@@ -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;
     }