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

don't dual check for form parameters

Browse source
This commit is contained in:
Graham Knop 2008-08-07 22:55:26 +00:00
parent 395a243d25
commit a01f5dce37
1 changed files with 2 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/WebGUI/Session/Form.pm
View file

@ -105,22 +105,17 @@ sub param {
my $field = shift; my $field = shift;
if ($field) { if ($field) {
if ($self->session->request) { if ($self->session->request) {
my @data = $self->session->request->body($field); my @data = $self->session->request->param($field);
return wantarray ? @data : $data[0] if (scalar(@data));
@data = $self->session->request->param($field);
return wantarray ? @data : $data[0]; return wantarray ? @data : $data[0];
} else { } else {
return undef; return undef;
} }
} else { } else {
if ($self->session->request) { if ($self->session->request) {
my %params = (); my %params;
foreach ($self->session->request->param) { foreach ($self->session->request->param) {
$params{$_} = 1; $params{$_} = 1;
} }
foreach ($self->session->request->body) {
$params{$_} = 1;
}
return keys %params; return keys %params;
} else { } else {
return undef; return undef;