diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Plack/Client.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Plack/Client.pm b/lib/Plack/Client.pm index 93cf532..f9482b6 100644 --- a/lib/Plack/Client.pm +++ b/lib/Plack/Client.pm @@ -52,6 +52,7 @@ sub request { die 'XXX' unless $app; my $env = $req->isa('HTTP::Request') ? $req->to_psgi : $req->env; + $env->{CONTENT_LENGTH} ||= length($req->content); # XXX: ??? my $psgi_res = $app->($env); if (ref($psgi_res) eq 'CODE') { my $body = ''; |