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

more missing session vars in form calls

Browse source
This commit is contained in:
Colin Kuskie 2006-01-17 17:47:12 +00:00
parent 16f19421a6
commit 9c07548c71
10 changed files with 22 additions and 29 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Asset/Shortcut.pm
View file

@ -317,8 +317,7 @@ sub getFieldsList {
}
$output .= '<table cellspacing="0" cellpadding="3" border="1"><tr><td><table cellspacing="0" cellpadding="3" border="0">';
my @prefFieldsToShow = split("\n",$self->getValue("prefFieldsToShow"));
$output .= WebGUI::Form::CheckList->new(
$self->session,
$output .= WebGUI::Form::CheckList->new($self->session,
-name=>"prefFieldsToShow",
-value=>\@prefFieldsToShow,
-options=>\%fieldNames,
@ -329,8 +328,7 @@ sub getFieldsList {
)->toHtmlWithWrapper;
$output .= '</table></td><td><table cellspacing="0" cellpadding="3" border="0">';
my @prefFieldsToImport = split("\n",$self->getValue("prefFieldsToImport"));
$output .= WebGUI::Form::CheckList->new(
$self->session,
$output .= WebGUI::Form::CheckList->new($self->session,
-name=>"prefFieldsToImport",
-value=>\@prefFieldsToImport,
-options=>\%fieldNames,

2
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -73,7 +73,7 @@ sub _createField {
}
}
my $cmd = "WebGUI::Form::".$data->{type};
return &$cmd(\%param);
return &$cmd($self->session, \%param);
}
#-------------------------------------------------------------------