fixing some bugs relaed to cs mail replies

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

View file

@ -132,6 +132,7 @@ sub formField {
my $properties = shift || {};
my $withWrapper = shift;
my $u = shift;
my $skipDefault = shift;
$properties->{label} = $self->getLabel unless $properties->{label};
$properties->{fieldType} = $self->get("fieldType");
$properties->{name} = $self->getId;
@ -143,7 +144,8 @@ sub formField {
}
$properties->{options} = $orderedValues;
my $default;
if (defined $self->session->form->process($properties->{name})) {
if ($skipDefault) {
} elsif (defined $self->session->form->process($properties->{name})) {
$default = $self->session->form->process($properties->{name});
} elsif (defined $u && defined $u->profileField($properties->{name})) {
$default = $u->profileField($properties->{name});