disassemble DispatchNode since Dispatch.pm can now differentiate between dispatch...

[catagits/Web-Simple.git] / lib / Web / Simple / DispatchNode.pm

diff --git a/lib/Web/Simple/DispatchNode.pm b/lib/Web/Simple/DispatchNode.pm
deleted file mode 100644 (file)
index f3b0e56..0000000
--- a/lib/Web/Simple/DispatchNode.pm
+++ /dev/null
@@ -1,20 +0,0 @@
-package Web::Simple::DispatchNode;
-
-use Moo;
-
-extends 'Web::Dispatch::Node';
-
-has _app_object => (is => 'ro', init_arg => 'app_object', required => 1);
-
-around _curry => sub {
-  my ($orig, $self) = (shift, shift);
-  # this ensures that the dispatchers get called as methods of the app itself
-  my $code = $self->$orig($self->_app_object, @_);
-  # if the first argument is a hashref, localize %_ to it to permit
-  # use of $_{name} inside the dispatch sub
-  ref($_[0]) eq 'HASH'
-    ? do { my $v = $_[0]; sub { local *_ = $v; &$code } }
-    : $code
-};
-
-1;