summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-01-07 16:51:21 -0600
committerJesse Luehrs <doy@tozt.net>2011-01-07 16:51:21 -0600
commitacf9a94c33748457d49e662c9c7ed3719a38eb65 (patch)
treef3af92b9d4416bacc3376f3fa2a433e0e8d5bb36
parent459dd0062bfc3ff82ee10a01e7dbb34ae003ce21 (diff)
downloadplack-client-acf9a94c33748457d49e662c9c7ed3719a38eb65.tar.gz
plack-client-acf9a94c33748457d49e662c9c7ed3719a38eb65.zip
rename this
-rw-r--r--lib/Plack/Client.pm6
-rw-r--r--lib/Plack/Client/Backend/http.pm2
-rw-r--r--lib/Plack/Client/Backend/psgi_local.pm2
3 files changed, 5 insertions, 5 deletions
diff --git a/lib/Plack/Client.pm b/lib/Plack/Client.pm
index d05293b..1984e72 100644
--- a/lib/Plack/Client.pm
+++ b/lib/Plack/Client.pm
@@ -184,7 +184,7 @@ sub _request_from_plack_request {
my $self = shift;
my ($req) = @_;
- return ($self->_app_from_req($req), $req->env);
+ return ($self->_app_from_request($req), $req->env);
}
sub _request_from_env {
@@ -234,7 +234,7 @@ sub _http_request_to_env {
return $env;
}
-sub _app_from_req {
+sub _app_from_request {
my $self = shift;
my ($req) = @_;
@@ -242,7 +242,7 @@ sub _app_from_req {
my $scheme = $req->env->{'plack.client.url_scheme'} || $uri->scheme;
my $backend = $self->_scheme_to_backend($scheme);
- my $app = $backend->app_from_req($req);
+ my $app = $backend->app_from_request($req);
die "Couldn't find app" unless $app;
diff --git a/lib/Plack/Client/Backend/http.pm b/lib/Plack/Client/Backend/http.pm
index 9982cd1..b8ca428 100644
--- a/lib/Plack/Client/Backend/http.pm
+++ b/lib/Plack/Client/Backend/http.pm
@@ -15,7 +15,7 @@ sub new {
sub proxy { shift->{proxy} }
-sub app_from_req {
+sub app_from_request {
my $self = shift;
my ($req) = @_;
diff --git a/lib/Plack/Client/Backend/psgi_local.pm b/lib/Plack/Client/Backend/psgi_local.pm
index 212479e..b38a332 100644
--- a/lib/Plack/Client/Backend/psgi_local.pm
+++ b/lib/Plack/Client/Backend/psgi_local.pm
@@ -24,7 +24,7 @@ sub app_for {
return $self->apps->{$for};
}
-sub app_from_req {
+sub app_from_request {
my $self = shift;
my ($req) = @_;