tweak to Pg test, warnings_like -> warnings_exist

[dbsrgits/DBIx-Class.git] / t / 72pg.t

diff --git a/t/72pg.t b/t/72pg.t
index 23a4b8e..39d7d5a 100644 (file)
--- a/t/72pg.t
+++ b/t/72pg.t
@@ -186,7 +186,7 @@ cmp_ok( $schema->resultset('Artist')->count, '==', 0, 'this should start with an
                       [qw| unq_nextval_schema   2 |],
                       [qw| unq_nextval_schema2  1 |],
                      );
-  warnings_like {
+  warnings_exist {
     TODO: {
           local $TODO = 'have not figured out a 100% reliable way to tell which schema an unqualified seq is in';