fix bad accessor assignments
This commit is contained in:
parent
00d97170f9
commit
cf23a67ae5
5 changed files with 5 additions and 5 deletions
|
|
@ -97,7 +97,7 @@ sub toHtml {
|
|||
$checked = 1;
|
||||
}
|
||||
}
|
||||
$output .= WebGUI::Form::Checkbox->new({
|
||||
$output .= WebGUI::Form::Checkbox->new($self->session,{
|
||||
name=>$self->get('name'),
|
||||
value=>$key,
|
||||
extras=>$self->get('extras'),
|
||||
|
|
|
|||
|
|
@ -105,7 +105,7 @@ sub toHtml {
|
|||
$types{html} = $i18n->get(1009);
|
||||
}
|
||||
}
|
||||
$self->get("options") = \%types,
|
||||
$self->set("options", \%types);
|
||||
return $self->SUPER::toHtml();
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -125,7 +125,7 @@ Creates a series of hidden fields representing the data in the list.
|
|||
|
||||
sub toHtmlAsHidden {
|
||||
my $self = shift;
|
||||
$self->get("options") = $self->session->db->buildHashRef("select groupId,groupName from groups");
|
||||
$self->set("options", $self->session->db->buildHashRef("select groupId,groupName from groups"));
|
||||
return $self->SUPER::toHtmlAsHidden();
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -108,7 +108,7 @@ sub toHtml {
|
|||
if ($self->get('value') eq $key) {
|
||||
$checked = 1;
|
||||
}
|
||||
$output .= WebGUI::Form::Radio->new({
|
||||
$output .= WebGUI::Form::Radio->new($self->session, {
|
||||
name=>$self->get('name'),
|
||||
value=>$key,
|
||||
extras=>$self->get('extras'),
|
||||
|
|
|
|||
|
|
@ -70,7 +70,7 @@ Renders a database connection picker control.
|
|||
|
||||
sub toHtml {
|
||||
my $self = shift;
|
||||
$self->get("options") = $self->session->datetime->getTimeZones();
|
||||
$self->set("options", $self->session->datetime->getTimeZones());
|
||||
return $self->SUPER::toHtml();
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue