X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F10sqlite_common.t;h=e588dedd3d9e8aa3a48f8e55482862184be1c95e;hb=b48f3f80f2201bb0921330b1a8d7800d11900e78;hp=6fe4b63dd0cb826d5bc55acc44a5e5ded2924ced;hpb=9dfbfb587564c5d01d561c5d48b62a1bb2af4faa;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

diff --git a/t/10sqlite_common.t b/t/10sqlite_common.t
index 6fe4b63..e588ded 100644
--- a/t/10sqlite_common.t
+++ b/t/10sqlite_common.t
@@ -2,6 +2,7 @@ use strict;
 use Test::More;
 use lib qw(t/lib);
 use dbixcsl_common_tests;
+use dbixcsl_test_dir qw/$tdir/;
 
 eval { require DBD::SQLite };
 my $class = $@ ? 'SQLite2' : 'SQLite';
@@ -9,11 +10,11 @@ my $class = $@ ? 'SQLite2' : 'SQLite';
 my $tester = dbixcsl_common_tests->new(
     vendor          => 'SQLite',
     auto_inc_pk     => 'INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT',
-    dsn             => "dbi:$class:dbname=./t/sqlite_test",
+    dsn             => "dbi:$class:dbname=$tdir/sqlite_test",
     user            => '',
     password        => '',
     connect_info_opts => {
-        on_connect_do => 'PRAGMA foreign_keys = ON',
+        on_connect_do => [ 'PRAGMA foreign_keys = ON', 'PRAGMA synchronous = OFF', ]
     },
     loader_options  => { preserve_case => 1 },
     data_types  => {
@@ -158,5 +159,5 @@ my $tester = dbixcsl_common_tests->new(
 $tester->run_tests();
 
 END {
-    unlink './t/sqlite_test';
+    unlink "$tdir/sqlite_test";
 }