X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F39load_namespaces_4.t;h=1bdc49d56b03beaac92b575d63895d1dab9ba9ef;hb=f895c500473b77db4ecf185ed21530b821a14ed4;hp=4c7c818b6bfb3191f2c50656294676044ff059d3;hpb=d81900119bbe932c7c112c022cce3d51a11979bb;p=dbsrgits%2FDBIx-Class.git diff --git a/t/39load_namespaces_4.t b/t/39load_namespaces_4.t index 4c7c818..1bdc49d 100644 --- a/t/39load_namespaces_4.t +++ b/t/39load_namespaces_4.t @@ -1,5 +1,3 @@ -#!/usr/bin/perl - use strict; use warnings; use Test::More; @@ -17,7 +15,7 @@ eval { __PACKAGE__->load_namespaces( default_resultset_class => 'RSBase' ); }; ok(!$@) or diag $@; -like($warnings, qr/load_namespaces found ResultSet class C with no corresponding Result class/); +like($warnings, qr/load_namespaces found ResultSet class 'DBICNSTest::ResultSet::C' with no corresponding Result class/); my $source_a = DBICNSTest->source('A'); isa_ok($source_a, 'DBIx::Class::ResultSource::Table');