summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-13 04:49:12 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-13 04:49:12 +0000
commit2da3c2875d514b3e74ab65cacaf323b6f449d974 (patch)
treed867237a7f4ff56d5c21199e81cd4df5a203236c
parent08a348853e9935d550afc864212a4d8e56a9eee8 (diff)
Fixing redirect for admin.pl
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@551 4979c152-3d1c-0410-bac9-87ea11338e46
-rw-r--r--common.pl2
1 files changed, 1 insertions, 1 deletions
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);
}