1 package Web::Simple::DispatchNode;
5 extends 'Web::Dispatch::Node';
7 has _app_object => (is => 'ro', init_arg => 'app_object', required => 1);
9 # this ensures that the dispatchers get called as methods of the app itself
10 around _curry => sub {
11 my ($orig, $self) = (shift, shift);
12 $self->$orig($self->_app_object, @_);