From f32b69a43c4db05d68c3271dc6c099da6fc9ef27 Mon Sep 17 00:00:00 2001 From: einhverfr Date: Sun, 29 Oct 2006 03:45:40 +0000 Subject: fixed process ordering that prevented Sysconfig from properly taking the globalusername, etc in the ledger-smb.conf git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@369 4979c152-3d1c-0410-bac9-87ea11338e46 --- LedgerSMB/Sysconfig.pm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'LedgerSMB') diff --git a/LedgerSMB/Sysconfig.pm b/LedgerSMB/Sysconfig.pm index 7c40ca2c..9e4cf308 100644 --- a/LedgerSMB/Sysconfig.pm +++ b/LedgerSMB/Sysconfig.pm @@ -53,18 +53,19 @@ my $globalDBConnect = 'dbi:Pg:dbname=ledgersmb;host=localhost;port=5432'; my $globalUserName = "ledgersmb"; my $globalPassword = "set me to correct password"; -#$GLOBALDBH = DBI->connect($globalDBConnect, $globalDBUserName, $globalDBPassword); # These lines prevent other apps in mod_perl from seeing the global db # connection info -my $globalDBConnect = undef; -my $globalUserName = undef; -my $globalPassword = undef; - eval { require "ledger-smb.conf"; }; if ($@){ print STDERR "Parsing ledger-smb.conf failed: $@"; } +#$GLOBALDBH = DBI->connect($globalDBConnect, $globalDBUserName, $globalDBPassword); + +my $globalDBConnect = undef; +my $globalUserName = undef; +my $globalPassword = undef; + 1; -- cgit v1.2.3