bug fixes from running t/FormGetName.t

This commit is contained in:
Colin Kuskie 2006-01-15 05:18:11 +00:00
parent 3b06849a80
commit 6a9a63c4b0
26 changed files with 70 additions and 47 deletions

View file

@ -121,13 +121,13 @@ sub toHtml {
name=>$self->get("name")."_interval",
value=>$interval,
extras=>$self->get("extras"),
id=>$self->{id}."_interval",
id=>$self->get('id')."_interval",
)->toHtml;
$cmd = "WebGUI::Form::SelectBox";
$out .= $cmd->new(
options=>\%units,
name=>$self->get("name")."_units",
id=>$self->{id}."_units",
id=>$self->get('id')."_units",
value=>[$units]
)->toHtml;
return $out;