bugfix: default value only worked for select list fields

This commit is contained in:
Len Kranendonk 2004-07-26 09:45:34 +00:00
parent 1ba29d7d85
commit bc2e8b649e
3 changed files with 6 additions and 2 deletions

View file

@ -65,7 +65,10 @@ sub getRequiredProfileFields {
$default = $session{form}{$data->{fieldName}};
} elsif (exists $session{user}{$data->{fieldName}}) {
$default = $session{user}{$data->{fieldName}};
}
} else {
$default = $data->{dataDefault};
}
my $cmd = 'WebGUI::Form::'.$method.'({"name"=>$data->{fieldName},"value"=>$default})';
$hash{'profile.formElement'} = eval($cmd);