summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-01-05 16:00:51 -0600
committerJesse Luehrs <doy@tozt.net>2011-01-05 16:00:51 -0600
commitdc5313d113245c8588e5bc4fab8a169bef607f7c (patch)
tree11f071ae11fd7993a165bb386ad0dec66ef1c729
parentf6fdd32c1ae9d8260d024351d9c5b9a87648ed77 (diff)
downloadplack-client-dc5313d113245c8588e5bc4fab8a169bef607f7c.tar.gz
plack-client-dc5313d113245c8588e5bc4fab8a169bef607f7c.zip
handle HEAD requests properly
-rw-r--r--lib/Plack/Client.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/Plack/Client.pm b/lib/Plack/Client.pm
index af145ff..82630f8 100644
--- a/lib/Plack/Client.pm
+++ b/lib/Plack/Client.pm
@@ -53,6 +53,9 @@ sub request {
my $env = $self->_req_to_env($req);
my $psgi_res = $self->_resolve_response($app->($env));
+ # is there a better place to do this? Plack::App::Proxy already takes care
+ # of this (since it's making a real http request)
+ $psgi_res->[2] = [] if $env->{REQUEST_METHOD} eq 'HEAD';
# XXX: or just return the arrayref?
return Plack::Response->new(@$psgi_res);