X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F39load_namespaces_rt41083.t;h=05378c80a0ad64dbf2ee2c9959e2f7b90aeb9294;hb=c3e9f7189094e94137356251c4f0b1f1cbfeb04a;hp=615036cbe0be5b215f09d8d60382339ac17d3d31;hpb=03e3321aba8d719195bf8a875e121e2b30e6655b;p=dbsrgits%2FDBIx-Class.git diff --git a/t/39load_namespaces_rt41083.t b/t/39load_namespaces_rt41083.t index 615036c..05378c8 100644 --- a/t/39load_namespaces_rt41083.t +++ b/t/39load_namespaces_rt41083.t @@ -1,13 +1,10 @@ -#!/usr/bin/perl - use strict; use warnings; use lib 't/lib'; +use DBICTest; # do not remove even though it is not used use Test::More tests => 8; -plan tests => 8; - sub _chk_warning { defined $_[0]? $_[0] !~ qr/We found ResultSet class '([^']+)' for '([^']+)', but it seems that you had already set '([^']+)' to use '([^']+)' instead/ :