Revert incorrectly backported fix for RT#102166 ( e8f23a77 )

[dbsrgits/DBIx-Class.git] / t / delete / cascade_missing.t

diff --git a/t/delete/cascade_missing.t b/t/delete/cascade_missing.t
index f5b95a1..8bd8a76 100644 (file)
--- a/t/delete/cascade_missing.t
+++ b/t/delete/cascade_missing.t
@@ -11,12 +11,13 @@ use DBICTest;
 my $schema = DBICTest->init_schema();
 $schema->_unregister_source('CD');
 
-warnings_like {
+warnings_exist {
+  my $s = $schema;
   lives_ok {
-    $_->delete for $schema->resultset('Artist')->all;
+    $_->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