use better api for form variables
This commit is contained in:
parent
9c6b4201f7
commit
cd68b13f61
1 changed files with 2 additions and 3 deletions
|
|
@ -122,15 +122,14 @@ sub param {
|
||||||
return undef unless $self->session->request;
|
return undef unless $self->session->request;
|
||||||
my $field = shift;
|
my $field = shift;
|
||||||
if ($field) {
|
if ($field) {
|
||||||
my @data = $self->session->request->param($field);
|
my @data = $self->session->request->parameters->get_all($field);
|
||||||
foreach my $value (@data) {
|
foreach my $value (@data) {
|
||||||
$value = Encode::decode_utf8($value);
|
$value = Encode::decode_utf8($value);
|
||||||
}
|
}
|
||||||
return wantarray ? @data : $data[0];
|
return wantarray ? @data : $data[0];
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
my $paramRef = $self->session->request->param;
|
return $self->session->request->parameters->keys;
|
||||||
return keys %{ $paramRef };
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue