From: Jason Etheridge <jason@equinoxinitiative.org>
Date: Fri, 25 Oct 2019 18:35:16 +0000 (-0400)
Subject: do file no longer sees lexicals
X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=commitdiff_plain;h=57251e33a2cb08e5865a9482571bf9c6d0895032

do file no longer sees lexicals

Signed-off-by: Jason Etheridge <jason@equinoxinitiative.org>
---

diff --git a/text/csv2sql b/text/csv2sql
index 9ee8203..2d74d0a 100755
--- a/text/csv2sql
+++ b/text/csv2sql
@@ -19,7 +19,7 @@ sub init {
         $dbh = connect_db($PGDATABASE,$PGUSER,undef,$PGHOST) or die $DBI::errstr;
     } else {
         our %config;
-        do '/openils/conf/offline-config.pl';
+        eval `cat /openils/conf/offline-config.pl`;
         $dbh = DBI->connect( $config{dsn}, $config{usr}, $config{pw} ) or die $DBI::errstr;
     }
 
@@ -52,7 +52,7 @@ sub init {
 		die "$csv_config does not exist\n";
 	}
 	if ($csv_config && -e $csv_config) {
-		do $csv_config;
+		eval `cat $csv_config`;
 	}
 	if (! -e $ARGV[0]) {
 		die "$ARGV[0] does not exist\n";