diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-01-25 16:27:56 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-01-25 16:27:56 -0600 |
commit | b5c9eeeb43b88c8a1319853e1a92d92b1c858057 (patch) | |
tree | d2691a651e2787d156c94b0ad4781a40e9536031 | |
parent | 20174fe7d811ade45febe9995d348c6ae7276fca (diff) | |
download | plack-client-b5c9eeeb43b88c8a1319853e1a92d92b1c858057.tar.gz plack-client-b5c9eeeb43b88c8a1319853e1a92d92b1c858057.zip |
new plack version fixes this
-rw-r--r-- | dist.ini | 2 | ||||
-rw-r--r-- | lib/Plack/Client.pm | 5 | ||||
-rw-r--r-- | t/02-inputs.t | 2 | ||||
-rw-r--r-- | t/03-delayed-response.t | 2 | ||||
-rw-r--r-- | t/04-streaming.t | 2 |
5 files changed, 1 insertions, 12 deletions
@@ -9,6 +9,6 @@ dist = Plack-Client [Prereqs] Class::Load = 0 HTTP::Request = 0 -Plack = 0.9910 +Plack = 0.9966 Plack::App::Proxy = 0 perl = 5.8.1 diff --git a/lib/Plack/Client.pm b/lib/Plack/Client.pm index 1f80aae..064ac9d 100644 --- a/lib/Plack/Client.pm +++ b/lib/Plack/Client.pm @@ -243,11 +243,6 @@ sub _http_request_to_env { $req->uri->port(-1); } - # work around http::message::psgi bug - see github issue 163 for plack - if (!$req->uri->path) { - $req->uri->path('/'); - } - my $env = $req->to_psgi; # work around http::message::psgi bug - see github issue 150 for plack diff --git a/t/02-inputs.t b/t/02-inputs.t index 5f9b56a..be14d0f 100644 --- a/t/02-inputs.t +++ b/t/02-inputs.t @@ -130,7 +130,6 @@ sub test_responses { my $base = URI->new($base_uri); my $uri = $base->clone; $uri->scheme('http'); - $uri->path('/') unless $uri->path; # XXX: work around plack bug my $env = HTTP::Request->new(GET => $uri)->to_psgi; $env->{CONTENT_LENGTH} = 0; # XXX: work around plack bug $env->{'plack.client.original_uri'} = $base; @@ -146,7 +145,6 @@ sub test_responses { my $base = URI->new($base_uri); my $uri = $base->clone; $uri->scheme('http'); - $uri->path('/') unless $uri->path; # XXX: work around plack bug my $env = HTTP::Request->new(GET => $uri)->to_psgi; $env->{CONTENT_LENGTH} = 0; # XXX: work around plack bug $env->{'plack.client.original_uri'} = $base; diff --git a/t/03-delayed-response.t b/t/03-delayed-response.t index a034f4a..7d256f0 100644 --- a/t/03-delayed-response.t +++ b/t/03-delayed-response.t @@ -133,7 +133,6 @@ sub test_responses { my $base = URI->new($base_uri); my $uri = $base->clone; $uri->scheme('http'); - $uri->path('/') unless $uri->path; # XXX: work around plack bug my $env = HTTP::Request->new(GET => $uri)->to_psgi; $env->{CONTENT_LENGTH} = 0; # XXX: work around plack bug $env->{'plack.client.original_uri'} = $base; @@ -149,7 +148,6 @@ sub test_responses { my $base = URI->new($base_uri); my $uri = $base->clone; $uri->scheme('http'); - $uri->path('/') unless $uri->path; # XXX: work around plack bug my $env = HTTP::Request->new(GET => $uri)->to_psgi; $env->{CONTENT_LENGTH} = 0; # XXX: work around plack bug $env->{'plack.client.original_uri'} = $base; diff --git a/t/04-streaming.t b/t/04-streaming.t index 2bee7a9..268cfa0 100644 --- a/t/04-streaming.t +++ b/t/04-streaming.t @@ -134,7 +134,6 @@ sub test_responses { my $base = URI->new($base_uri); my $uri = $base->clone; $uri->scheme('http'); - $uri->path('/') unless $uri->path; # XXX: work around plack bug my $env = HTTP::Request->new(GET => $uri)->to_psgi; $env->{CONTENT_LENGTH} = 0; # XXX: work around plack bug $env->{'plack.client.original_uri'} = $base; @@ -150,7 +149,6 @@ sub test_responses { my $base = URI->new($base_uri); my $uri = $base->clone; $uri->scheme('http'); - $uri->path('/') unless $uri->path; # XXX: work around plack bug my $env = HTTP::Request->new(GET => $uri)->to_psgi; $env->{CONTENT_LENGTH} = 0; # XXX: work around plack bug $env->{'plack.client.original_uri'} = $base; |