From: Peter Rabbitson <ribasushi@cpan.org>
Date: Tue, 29 Nov 2011 05:31:45 +0000 (+0100)
Subject: More test fixes following 4a425300 and new DBD::SQLite release
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cfa136aa2c08cfc19e7ef47e6cb1bccd8469e813;p=dbsrgits%2FDBIx-Class-Historic.git

More test fixes following 4a425300 and new DBD::SQLite release
---

diff --git a/t/100populate.t b/t/100populate.t
index 3109999..f8c6f10 100644
--- a/t/100populate.t
+++ b/t/100populate.t
@@ -45,7 +45,7 @@ throws_ok ( sub {
       }
     } ('Huey', 'Dewey', $ex_title, 'Louie')
   ])
-}, qr/\Qexecute_array() aborted with 'constraint failed\E.+ at populate slice.+$ex_title/ms, 'Readable exception thrown for failed populate');
+}, qr/\Qexecute_array() aborted with '\E.+ at populate slice.+$ex_title/ms, 'Readable exception thrown for failed populate');
 
 ## make sure populate honors fields/orders in list context
 ## schema order
diff --git a/t/storage/error.t b/t/storage/error.t
index b72b0fe..44cc1c9 100644
--- a/t/storage/error.t
+++ b/t/storage/error.t
@@ -16,7 +16,7 @@ warnings_are ( sub {
     sub {
       $schema->resultset('CD')->create({ title => 'vacation in antarctica' })
     },
-    qr/DBI Exception.+constraint failed.+cd\.artist.+NULL/s
+    qr/DBI Exception.+cd\.artist.+NULL/s
   );  # as opposed to some other error
 }, [], 'No warnings besides exception' );