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

EMS import/export, Form::*::getValueFromPost(alt_values), and tests

Browse source
This commit is contained in:
James Tolley 2007-05-29 23:39:24 +00:00
parent 0a7e06edca
commit c09b2cae1b
46 changed files with 1728 additions and 299 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/WebGUI/Form/SelectSlider.pm
View file

@ -16,6 +16,7 @@ package WebGUI::Form::SelectSlider;
use strict;
use base 'WebGUI::Form::Slider';
use WebGUI::Form::SelectList;
use WebGUI::International;
=head1 NAME
@ -177,16 +178,21 @@ sub getSliderValue {
#-------------------------------------------------------------------
=head2 getValueFromPost ( )
=head2 getValueFromPost ( [ value ] )
Retrieves a value from a form GET or POST and returns it. If the value comes
back as undef, this method will return the defaultValue instead. Strip
newlines/carriage returns from the value.
=head2 value
A value to process instead of POST input.
=cut
sub getValueFromPost {
my $self = shift;
my @args = @_;
my $properties = {
-name => $self->get('name'),
@ -196,7 +202,7 @@ sub getValueFromPost {
-size => 1,
};
return WebGUI::Form::selectList->new($self->session, $properties)->getValueFromPost;
return WebGUI::Form::SelectList->new($self->session, $properties)->getValueFromPost(@args);
}