summaryrefslogtreecommitdiff
path: root/bin/admin.pl
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-03-23 19:57:49 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-03-23 19:57:49 +0000
commit6d7ad70164576736bbb510bbfe33d9ed38ea8bac (patch)
treef67809a531944d9a72a587976ebac8ddf9955238 /bin/admin.pl
parentff7d058a52222c841d16497d3beb346c32d05718 (diff)
Fixing Access Denied on Admin logout
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@998 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin/admin.pl')
-rwxr-xr-xbin/admin.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/bin/admin.pl b/bin/admin.pl
index c035ff9f..40979063 100755
--- a/bin/admin.pl
+++ b/bin/admin.pl
@@ -43,6 +43,7 @@ use LedgerSMB::Session;
$form = new Form;
+
$locale = LedgerSMB::Locale->get_handle(${LedgerSMB::Sysconfig::language}) or
$form->error(__FILE__.':'.__LINE__.': '."Locale not loaded: $!\n");
$locale->encoding('UTF-8');
@@ -56,7 +57,6 @@ $form->{favicon} = "favicon.ico";
$form->{timeout} = 600;
require "bin/pw.pl";
-
# customization
if (-f "bin/custom/$form->{script}") {
eval { require "bin/custom/$form->{script}"; };
@@ -143,7 +143,7 @@ sub login {
sub logout {
-
+ $form->{login} = 'admin';
$form->{callback} = "admin.pl?action=adminlogin";
Session::session_destroy($form);
$form->redirect($locale->text('You are logged out'));