summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-10-30 05:20:17 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-10-30 05:20:17 +0000
commit082d715cd9f6ff36c7c6af5c649fb5b094cba82d (patch)
treea8840e8d567cb296f2348901c4543347c997a7f7 /LedgerSMB
parentb5abb3df53ff5970bb422f731663fbef17190954 (diff)
Fixing scoping issue with employeenumber
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@383 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
-rwxr-xr-xLedgerSMB/User.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/LedgerSMB/User.pm b/LedgerSMB/User.pm
index fabcde51..f8d8d92e 100755
--- a/LedgerSMB/User.pm
+++ b/LedgerSMB/User.pm
@@ -782,6 +782,7 @@ sub save_member {
my ($id) = $sth->fetchrow_array;
$sth->finish;
+ my $employeenumber;
if ($id) {
$query = qq|UPDATE employee SET
@@ -792,7 +793,7 @@ sub save_member {
} else {
- my ($employeenumber) = Form::update_defaults(
+ ($employeenumber) = Form::update_defaults(
"", \%$self, "employeenumber", $dbh);
$query = qq|
INSERT INTO employee