From 4a1e2a1527efa70ad59f08a7342a297d0d91f60f Mon Sep 17 00:00:00 2001 From: Tatsuhiko Miyagawa Date: Fri, 9 Oct 2009 12:55:49 -0700 Subject: [PATCH] ->wrap can now be called on instance too --- lib/Plack/Middleware.pm | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lib/Plack/Middleware.pm b/lib/Plack/Middleware.pm index 1cb54c0f9..bc4f5f8c7 100644 --- a/lib/Plack/Middleware.pm +++ b/lib/Plack/Middleware.pm @@ -14,8 +14,13 @@ sub import { } sub wrap { - my($class, $app, @args) = @_; - $class->new({ app => $app, @args })->to_app; + my($self, $app, @args) = @_; + if (ref $self) { + $self->{app} = $app; + } else { + $self = $self->new({ app => $app, @args }); + } + return $self->to_app; } sub to_app {