From 641ad402b40aeb05a61b8176d60053345f32639f Mon Sep 17 00:00:00 2001 From: Thomas Klausner Date: Mon, 2 Sep 2013 14:06:24 +0200 Subject: fixed all_parameters --- lib/Web/Request.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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; -- cgit v1.2.3-54-g00ecf