diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-13 03:59:55 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-13 03:59:55 +0000 |
| commit | ff0aaf696591a9eb089df9677fd0149c873f03c7 (patch) | |
| tree | 51ce08363cf871aac21ed13725476cb2cba4d3b1 | |
| parent | 931f4577790e69156969612a67b824bd8da4c45f (diff) | |
Hopefully fixing behavior on saving users.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@549 4979c152-3d1c-0410-bac9-87ea11338e46
| -rwxr-xr-x | bin/admin.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/bin/admin.pl b/bin/admin.pl index 5dd9d71e..a0e8ce12 100755 --- a/bin/admin.pl +++ b/bin/admin.pl @@ -82,6 +82,7 @@ if ($form->{action}) { 1; # end + sub adminlogin { $form->{title} = qq|LedgerSMB $form->{version} |.$locale->text('Administration'); @@ -697,6 +698,7 @@ sub form_header { sub save { + $form->{callback} = "admin.pl?action=login"; # no driver checked $form->error(__FILE__.':'.__LINE__.': '.$locale->text('Database Driver not checked!')) unless $form->{dbdriver}; |