diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-30 05:20:17 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-10-30 05:20:17 +0000 |
| commit | 082d715cd9f6ff36c7c6af5c649fb5b094cba82d (patch) | |
| tree | a8840e8d567cb296f2348901c4543347c997a7f7 /LedgerSMB/User.pm | |
| parent | b5abb3df53ff5970bb422f731663fbef17190954 (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/User.pm')
| -rwxr-xr-x | LedgerSMB/User.pm | 3 |
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 |