bug fixes from running t/FormGetName.t
This commit is contained in:
parent
3b06849a80
commit
6a9a63c4b0
26 changed files with 70 additions and 47 deletions
|
|
@ -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;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue