X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=maint%2Fgen_sqlite_schema_files;h=a3793d33e7ff0088221130abc5b084d7e11d76ca;hb=e950561517b3701e01630c34daa6d750725adb55;hp=03db9992bd4964c62572c7e68aad60b2ba13098d;hpb=6635c6d22b8b28954db80113273584027e16d9e1;p=dbsrgits%2FDBIx-Class.git

diff --git a/maint/gen_sqlite_schema_files b/maint/gen_sqlite_schema_files
index 03db999..a3793d3 100755
--- a/maint/gen_sqlite_schema_files
+++ b/maint/gen_sqlite_schema_files
@@ -26,6 +26,7 @@ die "You need to specify one DBIC schema class via --schema-class\n"
 die "You may not specify more than one deploy path via --deploy-to\n"
   if @{$args->{'deploy-to'}||[]} > 1;
 
+local $ENV{DBI_DSN};
 my $schema = use_module( $args->{'schema-class'}[0] )->connect(
   $args->{'deploy-to'}
     ? ( "DBI:SQLite:$args->{'deploy-to'}[0]", undef, undef, { on_connect_do => "PRAGMA synchronous = OFF" } )