From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Apr 2016 13:17:15 +0000 (+0100)
Subject: CommodsDatabase: In db_connect_core, break out $opts into a variable
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-test.git;a=commitdiff_plain;h=56930e8be13d91872c740164e9eb632d5477a455;hp=a10948d5fc25a14690fc50219a47739fcead10af

CommodsDatabase: In db_connect_core, break out $opts into a variable

No functional change
---

diff --git a/yarrg/CommodsDatabase.pm b/yarrg/CommodsDatabase.pm
index f704f12..0d491c4 100644
--- a/yarrg/CommodsDatabase.pm
+++ b/yarrg/CommodsDatabase.pm
@@ -64,10 +64,10 @@ sub dbr_connect ($$) {
 
 sub db_connect_core ($) {
     my ($fn)= @_;
-    my $h= DBI->connect("dbi:SQLite:$fn",'','',
-		       { AutoCommit=>0,
-			 RaiseError=>1, ShowErrorStatement=>1,
-			 sqlite_unicode=>1 })
+    my $opts = { AutoCommit=>0,
+		 RaiseError=>1, ShowErrorStatement=>1,
+		 sqlite_unicode=>1 };
+    my $h= DBI->connect("dbi:SQLite:$fn",'','',$opts)
 	or die "$fn $DBI::errstr ?";
     return $h;
     # default timeout is 30s which is plenty