X-Git-Url: https://git.decadent.org.uk/gitweb/?p=maypole.git;a=blobdiff_plain;f=t%2Fdb_colinfo.t;h=0c19556b6c732ad360a58556e82722a06051bb1b;hp=ed54fd7de3f94c3f8d5c4810c7a093f11e5132c0;hb=2a0564f48a17a688c114fac6384bb2a4dd34865b;hpb=b550cf6041017b7ba7486661a1a22e592430e962

diff --git a/t/db_colinfo.t b/t/db_colinfo.t
index ed54fd7..0c19556 100755
--- a/t/db_colinfo.t
+++ b/t/db_colinfo.t
@@ -92,18 +92,20 @@ package main;
 
 $DB_Class = 'BeerDB::BeerTestsqlite';
 
+$err = undef;
 #unlink "t/test.db";
 if ( !-e "t/test.db" ) {
 	eval {make_sqlite_db($sql)};
 	$err = $@;
 	if ($err) { print "Skipping sql tests because couldnt make sqlite test db
-		because of error $err"; exit; };
+		because of error: $err";};
+}
+unless ($err) {
+	my $driver = sqlite_driver();
+	eval { $DB_Class->connection("dbi:$driver:dbname='t/test.db'");};
+	$err = $@;
 }
 
-my $driver = sqlite_driver();
-eval { $DB_Class->connection("dbi:$driver:dbname='t/test.db'");};
-$err = $@;
-if ($err) { die "CDBI connection error: $err"; }
 $skip_msg = "Could not connect to SQLite database 't/test.db'";
 $skip_howmany = 13;