oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Updated FormListEquiv.t, all tests pass

Browse source 
fix class method in DatabaseLink.pm
fix accessor method in Form/DatabaseLink.pm
This commit is contained in:
Colin Kuskie 2006-01-16 00:42:15 +00:00
parent e1a90f66fd
commit 6d9ed4b3cd
3 changed files with 75 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lib/WebGUI/DatabaseLink.pm
View file

@ -192,6 +192,7 @@ A reference to the current session.
=cut
sub getList {
my $class = shift;
my $session = shift;
my $list = $session->db->buildHashRef("select databaseLinkId, title from databaseLink order by title");
my $i18n = WebGUI::International->new($session);

2
lib/WebGUI/Form/DatabaseLink.pm
View file

@ -107,7 +107,7 @@ Renders a database connection picker control.
sub toHtml {
my $self = shift;
$self->get("options") = WebGUI::DatabaseLink->getList($self->session);
$self->set("options", WebGUI::DatabaseLink->getList($self->session));
return $self->SUPER::toHtml();
}