diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-01-12 11:44:09 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-01-12 11:44:09 -0600 |
commit | 9970a68dbb108d36b16595d26b827a7d63223155 (patch) | |
tree | fc29554cd9c21e644e4f0b88b5c41aafdc2ab216 /lib/Plack/Client/Backend/psgi_local.pm | |
parent | 887ef01b958d7c45fc7ea29d9b0ff570a54505dc (diff) | |
download | plack-client-9970a68dbb108d36b16595d26b827a7d63223155.tar.gz plack-client-9970a68dbb108d36b16595d26b827a7d63223155.zip |
add Plack::Client::Backend as a base class
Diffstat (limited to 'lib/Plack/Client/Backend/psgi_local.pm')
-rw-r--r-- | lib/Plack/Client/Backend/psgi_local.pm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/Plack/Client/Backend/psgi_local.pm b/lib/Plack/Client/Backend/psgi_local.pm index 1da572b..7bb9bcc 100644 --- a/lib/Plack/Client/Backend/psgi_local.pm +++ b/lib/Plack/Client/Backend/psgi_local.pm @@ -6,6 +6,8 @@ use warnings; use Carp; use Plack::Middleware::ContentLength; +use base 'Plack::Client::Backend'; + =head1 SYNOPSIS Plack::Client->new( @@ -43,13 +45,14 @@ A mapping of local app names to PSGI app coderefs. sub new { my $class = shift; my %params = @_; + my $self = $class->SUPER::new(@_); croak 'apps must be a hashref' if ref($params{apps}) ne 'HASH'; - bless { - apps => $params{apps}, - }, $class; + $self->{apps} = $params{apps}; + + return $self; } sub _apps { shift->{apps} } |