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

Fix loose calls to $form->param('key')

Browse source
This commit is contained in:
Colin Kuskie 2010-10-05 16:03:33 -07:00
parent f883d8b35f
commit 5ff871f2d5
3 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Asset/Event.pm
View file

@ -1399,7 +1399,7 @@ sub processPropertiesFromFormPost {
my $assetId = $self->get('assetId');
my $revisionDate = $self->get('revisionDate');
$session->db->write("UPDATE Event SET sequenceNumber =? WHERE assetId = ? AND revisionDate =?",[($form->param('sequenceNumber') || $top_val), $assetId, $revisionDate]);
$session->db->write("UPDATE Event SET sequenceNumber =? WHERE assetId = ? AND revisionDate =?",[(scalar($form->param('sequenceNumber')) || $top_val), $assetId, $revisionDate]);
# Pre-process Related Links and manage changes

4
lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
View file

@ -2016,7 +2016,7 @@ sub www_importEvents {
-label => $i18n->get('ignore first line'),
-name => 'ignore_first_line',
-hoverHelp => $i18n->get('import hoverhelp first line'),
-defaultValue => $form->param('ignore_first_line'),
-defaultValue => scalar $form->param('ignore_first_line'),
);
# create the std & meta fields part of the form
@ -2033,7 +2033,7 @@ sub www_importEvents {
name => 'fieldsToImport',
defaultValue => \@defaultImportableFields,
options => \%importableFields,
value => $form->get('fieldsToImport'),
value => scalar $form->get('fieldsToImport'),
);
$f->submit(-value=>$i18n->get('import events'));