no more getSlave, convert code to use dbSlave instead

more form accessor fixes
Form/Template.pm, all asset calls need a session var
This commit is contained in:
Colin Kuskie 2006-01-16 00:08:58 +00:00
parent 77f9ae07b2
commit 197dacadec
9 changed files with 13 additions and 15 deletions

View file

@ -116,7 +116,7 @@ sub toHtml {
'most'=>$i18n->get(421),
'all'=>$i18n->get(419)
);
$self->get("options") = \%filter;
$self->set("options", \%filter);
return $self->SUPER::toHtml();
}

View file

@ -114,7 +114,7 @@ Renders a database connection picker control.
sub toHtml {
my $self = shift;
$self->get("options") = WebGUI::LDAPLink->getList($self->session,);
$self->set("options", WebGUI::LDAPLink->getList($self->session));
return $self->SUPER::toHtml();
}
@ -128,7 +128,7 @@ Creates a series of hidden fields representing the data in the list.
sub toHtmlAsHidden {
my $self = shift;
$self->get("options") = WebGUI::LDAPLink->getList($self->session,);
$self->set("options", WebGUI::LDAPLink->getList($self->session));
return $self->SUPER::toHtmlAsHidden();
}
@ -148,7 +148,7 @@ sub toHtmlWithWrapper {
$subtext = $self->session->icon->edit("op=editLDAPLink;llid=".$self->get("value").";afterEdit=".$self->session->url->escape($self->get("afterEdit")));
}
$subtext .= $self->session->icon->manage("op=listLDAPLinks");
$self->get("subtext") = $subtext . $self->get("subtext");
$self->set("subtext", $subtext . $self->get("subtext"));
}
return $self->SUPER::toHtmlWithWrapper;
}

View file

@ -93,15 +93,15 @@ Renders a template picker control.
sub toHtml {
my $self = shift;
my $templateList = WebGUI::Asset::Template->getList($self->get("namespace"));
my $templateList = WebGUI::Asset::Template->getList($self->session, $self->get("namespace"));
#Remove entries from template list that the user does not have permission to view.
for my $assetId ( keys %{$templateList} ) {
my $asset = WebGUI::Asset::Template->new($assetId);
my $asset = WebGUI::Asset::Template->new($self->session, $assetId);
if (!$asset->canView($self->session->user->userId)) {
delete $templateList->{$assetId};
}
}
$self->get("options") = $templateList;
$self->set("options", $templateList);
$self->setManageIcons();
return $self->SUPER::toHtml();
}