From 2da3c2875d514b3e74ab65cacaf323b6f449d974 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Mon, 13 Nov 2006 04:49:12 +0000
Subject: Fixing redirect for  admin.pl

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@551 4979c152-3d1c-0410-bac9-87ea11338e46
---
 common.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'common.pl')

diff --git a/common.pl b/common.pl
index b93b20e9..4bc27807 100644
--- a/common.pl
+++ b/common.pl
@@ -56,7 +56,7 @@ sub redirect {
 	if (!$myconfig){ # needed for login
 		%myconfig = %{LedgerSMB::User->fetch_config($form->{login})};
 	}
-	if (!$form->{dbh}){
+	if (!$form->{dbh} and ($script ne 'admin.pl')){
 		$form->db_init(\%myconfig);
 	}
 
-- 
cgit v1.2.3