fix bug [ 1429335 ] 6.9: Error in User.pm prevents creating new users

Root cause: Can't modify non-lvalue subroutine call at lib/WebGUI/Operation/User.pm line 404
This commit is contained in:
kenperl 2006-02-12 15:12:58 +00:00
parent f033e044a5
commit 6c39292246

View file

@ -401,7 +401,7 @@ sub www_editUserSave {
my $error;
if (($uid eq $session->form->process("uid") || $uid eq "") && $session->form->process("username") ne '') {
my $u = WebGUI::User->new($session,$session->form->process("uid"));
$session->form->process("uid") = $u->userId unless ($isSecondary);
$session->form->process("uid") = $u->userId unless ( $isAdmin ||$isSecondary);
$u->username($session->form->process("username"));
$u->authMethod($session->form->process("authMethod"));
$u->status($session->form->process("status"));