diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-31 03:30:39 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-31 03:30:39 +0000 |
commit | c0e83f8de881755f3b5e9b624c1c17ae2d4649ab (patch) | |
tree | ed788a6c04e35faf8a6b26e8afe16096efa61608 /bin/admin.pl | |
parent | e2bbcb8d35f48c73d989c3d01bc5a028df8aac32 (diff) |
Defaults table revision. Most COA's and System->defaults are known to be broken.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@413 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin/admin.pl')
-rwxr-xr-x | bin/admin.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bin/admin.pl b/bin/admin.pl index 74f3f6cf..4913b9b3 100755 --- a/bin/admin.pl +++ b/bin/admin.pl @@ -880,7 +880,8 @@ sub delete { $form->{templates} = ($form->{templates}) ? "${LedgerSMB::Sysconfig::templates}/$form->{templates}" : "$templates/$form->{login}"; - $form->error($locale->text("[_1] locked!", ${LedgerSMB::Sysconfig::memberfile}) if (-f ${memberfile}.LCK); + $form->error($locale->text("[_1] locked!", + ${LedgerSMB::Sysconfig::memberfile})) if (-f ${memberfile}.LCK); open(FH, ">${memberfile}.LCK") or $form->error("${memberfile}.LCK : $!"); close(FH); |