diff options
| author | Jesse Luehrs <doy@tozt.net> | 2010-12-31 15:25:37 -0600 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2010-12-31 15:25:37 -0600 |
| commit | 02c87fd5b686f23fb0b1a68f70dc14033d2c3c38 (patch) | |
| tree | 3fbcfa885fd08eab4bf8c7c523641aedba70c8c0 | |
| parent | 934a64b7706ec6092c0b2197f46dcdea82ff5192 (diff) | |
| download | plack-client-02c87fd5b686f23fb0b1a68f70dc14033d2c3c38.tar.gz plack-client-02c87fd5b686f23fb0b1a68f70dc14033d2c3c38.zip | |
use psgi-local: rather than psgi:
| -rw-r--r-- | lib/Plack/Client.pm | 2 | ||||
| -rw-r--r-- | t/01-basic.t | 4 | ||||
| -rw-r--r-- | t/02-inputs.t | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/lib/Plack/Client.pm b/lib/Plack/Client.pm index f9482b6..cc61ef7 100644 --- a/lib/Plack/Client.pm +++ b/lib/Plack/Client.pm @@ -39,7 +39,7 @@ sub request { # both Plack::Request and HTTP::Request have a ->uri method my $scheme = $req->uri->scheme; my $app; - if ($scheme eq 'psgi') { + if ($scheme eq 'psgi-local') { $req->uri->path('/') unless length $req->uri->path; $app = $self->app_for($req->uri->authority); } diff --git a/t/01-basic.t b/t/01-basic.t index e138e10..0be56ac 100644 --- a/t/01-basic.t +++ b/t/01-basic.t @@ -42,12 +42,12 @@ test_tcp_plackup( is($client->app_for('bar'), undef, "didn't get nonexistent app"); { - my $res = $client->get('psgi://foo/'); + my $res = $client->get('psgi-local://foo/'); response_is($res, 200, ['Content-Type' => 'text/plain'], '/'); } { - my $res = $client->get('psgi://foo/foo'); + my $res = $client->get('psgi-local://foo/foo'); response_is($res, 200, ['Content-Type' => 'text/plain'], 'oof/'); } } diff --git a/t/02-inputs.t b/t/02-inputs.t index bafe960..0bedc65 100644 --- a/t/02-inputs.t +++ b/t/02-inputs.t @@ -44,7 +44,7 @@ test_tcp_plackup( my $apps = { foo => eval $app, }; - my $base_uri = 'psgi://foo'; + my $base_uri = 'psgi-local://foo'; test_responses($base_uri, Plack::Client->new(apps => $apps)); } |