X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FEngine.pm;h=cd0d3838fcdfc6c1fbee762e600ca067e50a3d7f;hb=f7fde75aa2bb6c238a6c938b59955dd897d4a7d9;hp=194d254a20ba2308dc1b3d5a917b2dda795a1562;hpb=32ed98de51991a84501ab4d32ff4db4fb7f128ad;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm index 194d254..cd0d383 100644 --- a/lib/Catalyst/Engine.pm +++ b/lib/Catalyst/Engine.pm @@ -14,6 +14,7 @@ use Encode 2.21 'decode_utf8'; use Plack::Request::Upload; use Hash::MultiValue; use namespace::clean -except => 'meta'; +use utf8; # Amount of data to read from input on each pass our $CHUNKSIZE = 64 * 1024; @@ -129,7 +130,6 @@ sub finalize_body { # There's no body... $body = []; } - $res->_response_cb->([ $res->status, \@headers, $body]); $res->_clear_response_cb; @@ -685,6 +685,7 @@ sub prepare_uploads { ( size => $upload->{size}, type => scalar $headers->content_type, + charset => scalar $headers->content_type_charset, headers => $headers, tempname => $upload->{tempname}, filename => $filename,