Warn-free test suite with later DBIC

[dbsrgits/DBIx-Class-DeploymentHandler.git] / t / lib / DBICDHTest.pm

diff --git a/t/lib/DBICDHTest.pm b/t/lib/DBICDHTest.pm
index eddd418..013f79f 100644 (file)
--- a/t/lib/DBICDHTest.pm
+++ b/t/lib/DBICDHTest.pm
@@ -4,8 +4,7 @@ use strict;
 use warnings;
 
 use File::Path 'remove_tree';
-use Test::More;
-use Test::Exception;
+use DBI;
 
 sub ready {
    if (-d 't/sql') {
@@ -14,4 +13,8 @@ sub ready {
    }
 }
 
+sub dbh {
+  DBI->connect('dbi:SQLite::memory:', undef, undef, { RaiseError => 1 })
+}
+
 1;