diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-03-23 19:57:49 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-03-23 19:57:49 +0000 |
commit | 6d7ad70164576736bbb510bbfe33d9ed38ea8bac (patch) | |
tree | f67809a531944d9a72a587976ebac8ddf9955238 /bin/admin.pl | |
parent | ff7d058a52222c841d16497d3beb346c32d05718 (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-x | bin/admin.pl | 4 |
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')); |