X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FRequest.pm;h=7b41cfebcb0b0fe1036bcea5f6856fd16acffbd6;hb=55f8e5163b1f5c502b92a9976350c611610c80e3;hp=39cc3a45d451ef3af0665648fad303db20725863;hpb=4f96d61ccf40febbf2f80a376cd3ec7b456c699c;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Request.pm b/lib/Catalyst/Request.pm index 39cc3a4..7b41cfe 100644 --- a/lib/Catalyst/Request.pm +++ b/lib/Catalyst/Request.pm @@ -10,7 +10,7 @@ use HTTP::Headers; use Stream::Buffered; use Hash::MultiValue; use Scalar::Util; - +use HTTP::Body; use Moose; use namespace::clean -except => 'meta'; @@ -672,7 +672,7 @@ sub param { } elsif ( @params > 1 ) { my $field = shift @params; - $self->parameters->{$field} = [@_]; + $self->parameters->{$field} = [@params]; } } @@ -877,7 +877,7 @@ sub mangle_params { next unless defined $value; for ( ref $value eq 'ARRAY' ? @$value : $value ) { $_ = "$_"; - utf8::encode( $_ ) if utf8::is_utf8($_); + # utf8::encode($_); } };