X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F18inserterror.t;h=2efb8d59eb3d4067e66cdf31b49409670f4bf0e6;hb=d759a1ee6f8a74f6439ad1f4fb52c2fe571c48b1;hp=005209ac4e3e046d079f7686579ab4c056dce517;hpb=e60dc79fcd4d6318e83584b826526e65048b86a9;p=dbsrgits%2FDBIx-Class.git diff --git a/t/18inserterror.t b/t/18inserterror.t index 005209a..2efb8d5 100644 --- a/t/18inserterror.t +++ b/t/18inserterror.t @@ -24,6 +24,6 @@ my $schema = DBICTest->init_schema; ->create({ title => 'vacation in antarctica' }) }; like $@, qr/NULL/; # as opposed to some other error - ok( $warnings !~ /uninitialized value/, "No warning from Storage" ); + unlike( $warnings, qr/uninitialized value/, "No warning from Storage" ); }