X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fdelete%2Fcascade_missing.t;h=8bd8a769bf5abd15ca60de7cae6999ddbe859909;hb=fa8ac103c66ef86ebec9b9dee5d655cff01d6e35;hp=03de8832c0cbcc77fba1dbdc25b7595c6c53ce99;hpb=65d351219882184861384aedac6f251b6797d0d7;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/t/delete/cascade_missing.t b/t/delete/cascade_missing.t
index 03de883..8bd8a76 100644
--- a/t/delete/cascade_missing.t
+++ b/t/delete/cascade_missing.t
@@ -11,13 +11,13 @@ use DBICTest;
 my $schema = DBICTest->init_schema();
 $schema->_unregister_source('CD');
 
-warnings_like {
+warnings_exist {
   my $s = $schema;
   lives_ok {
     $_->delete for $s->resultset('Artist')->all;
   } 'delete on rows with dangling rels lives';
 } [
-  # 12 == 3 artists * failed cascades:
+  # 9 == 3 artists * failed cascades:
   #   cds
   #   cds_unordered
   #   cds_very_very_very_long_relationship_name