factor dispatcher out into Web::Dispatch
[catagits/Web-Simple.git] / lib / Plack / Middleware / Dispatch.pm
1 package Plack::Middleware::Dispatch;
2
3 use Moo;
4
5 extends 'Web::Dispatch';
6
7 has app => (is => 'ro', writer => '_set_app');
8
9 sub wrap {
10   my ($self, $app, @args) = @_;
11   if (ref $self) {
12     $self->_set_app($app);
13   } else {
14     $self = $self->new({ app => $app, @args });
15   }
16   return $self->to_app;
17 }
18
19 1;