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;
|
$checked = 1;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
$output .= WebGUI::Form::Checkbox->new({
|
$output .= WebGUI::Form::Checkbox->new($self->session,{
|
||||||
name=>$self->get('name'),
|
name=>$self->get('name'),
|
||||||
value=>$key,
|
value=>$key,
|
||||||
extras=>$self->get('extras'),
|
extras=>$self->get('extras'),
|
||||||
|
|
|
||||||
|
|
@ -105,7 +105,7 @@ sub toHtml {
|
||||||
$types{html} = $i18n->get(1009);
|
$types{html} = $i18n->get(1009);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
$self->get("options") = \%types,
|
$self->set("options", \%types);
|
||||||
return $self->SUPER::toHtml();
|
return $self->SUPER::toHtml();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -125,7 +125,7 @@ Creates a series of hidden fields representing the data in the list.
|
||||||
|
|
||||||
sub toHtmlAsHidden {
|
sub toHtmlAsHidden {
|
||||||
my $self = shift;
|
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();
|
return $self->SUPER::toHtmlAsHidden();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -108,7 +108,7 @@ sub toHtml {
|
||||||
if ($self->get('value') eq $key) {
|
if ($self->get('value') eq $key) {
|
||||||
$checked = 1;
|
$checked = 1;
|
||||||
}
|
}
|
||||||
$output .= WebGUI::Form::Radio->new({
|
$output .= WebGUI::Form::Radio->new($self->session, {
|
||||||
name=>$self->get('name'),
|
name=>$self->get('name'),
|
||||||
value=>$key,
|
value=>$key,
|
||||||
extras=>$self->get('extras'),
|
extras=>$self->get('extras'),
|
||||||
|
|
|
||||||
|
|
@ -70,7 +70,7 @@ Renders a database connection picker control.
|
||||||
|
|
||||||
sub toHtml {
|
sub toHtml {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
$self->get("options") = $self->session->datetime->getTimeZones();
|
$self->set("options", $self->session->datetime->getTimeZones());
|
||||||
return $self->SUPER::toHtml();
|
return $self->SUPER::toHtml();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue