diff options
author | Thomas Klausner <domm@plix.at> | 2013-09-02 14:06:24 +0200 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-09-02 09:41:33 -0400 |
commit | 641ad402b40aeb05a61b8176d60053345f32639f (patch) | |
tree | f0581539f3282b048330f370d4a8e026a491a0a8 | |
parent | a05a2d22c729721f1ff19ff87d2ed2f27fa9b936 (diff) | |
download | web-request-641ad402b40aeb05a61b8176d60053345f32639f.tar.gz web-request-641ad402b40aeb05a61b8176d60053345f32639f.zip |
fixed all_parameters
-rw-r--r-- | lib/Web/Request.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Web/Request.pm b/lib/Web/Request.pm index 15a1d5a..7250733 100644 --- a/lib/Web/Request.pm +++ b/lib/Web/Request.pm @@ -454,7 +454,7 @@ sub all_parameters { my $body_parameters = $self->all_body_parameters; for my $key (keys %$body_parameters) { - push @{ $ret->{$key} ||= [] }, @{ $body_parameters->{key} }; + push @{ $ret->{$key} ||= [] }, @{ $body_parameters->{$key} }; } return $ret; |