oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixing some bugs relaed to cs mail replies

Browse source 
fixed a bug in the user manager where the user would take on the username/alias of the visitor
fixed a bug in error handling where debug was being spewed for errors in approriately
This commit is contained in:
JT Smith 2006-04-11 22:50:11 +00:00
parent 91c4083d8a
commit a7df0f7a55
9 changed files with 82 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/Operation/User.pm
View file

@ -298,6 +298,7 @@ sub www_editUser {
my $tabform = WebGUI::TabForm->new($session,\%tabs);
my $u = WebGUI::User->new($session,($uid eq 'new') ? '' : $uid); #Setting uid to '' when uid is 'new' so visitor defaults prefill field for new user
my $username = $u->userId eq '1' ? '' : $u->username;
$session->stow->set("editUser_UID", $uid);
$session->style->setScript($session->config->get("extrasURL")."/swapLayers.js", {type=>"text/javascript"});
$session->style->setRawHeadTags('<script type="text/javascript">var active="'.$u->authMethod.'";</script>');
@ -311,7 +312,7 @@ sub www_editUser {
$tabform->getTab("account")->text(
-name=>"username",
-label=>$i18n->get(50),
-value=>$session->form->process("username")|| $u->username
-value=>$username
);
my %status;
tie %status, 'Tie::IxHash';
@ -354,7 +355,11 @@ sub www_editUser {
foreach my $field (@{$category->getFields}) {
next if $field->getId =~ /contentPositions/;
my $label = $field->getLabel . ($field->isRequired ? "*" : '');
$tabform->getTab("profile")->raw($field->formField({label=>$label},1,$u));
if ($field->getId eq "alias" && $u->userId eq '1') {
$tabform->getTab("profile")->raw($field->formField({label=>$label},1,undef,1));
} else {
$tabform->getTab("profile")->raw($field->formField({label=>$label},1,$u));
}
}
$tabform->getTab("profile")->fieldSetEnd($category->getLabel);
}