X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FWeb-Simple.git;a=blobdiff_plain;f=lib%2FWeb%2FSimple%2FApplication.pm;h=de514c8dd4d8eec2e26372c44a694842ecfb698c;hp=77646187d9be2b20e210d8792c7d568af230cb15;hb=81a5b03ea99065c6dfff6a3ccd99241dd03826c6;hpb=3583ca04311e905c78ba0cbb467d8c21e63043b1 diff --git a/lib/Web/Simple/Application.pm b/lib/Web/Simple/Application.pm index 7764618..de514c8 100644 --- a/lib/Web/Simple/Application.pm +++ b/lib/Web/Simple/Application.pm @@ -40,8 +40,8 @@ use warnings FATAL => 'all'; } sub _match_against { - return ({}, $_[1]) unless $_[0]->{matches}; - $_[0]->{matches}->($_[1]); + return ({}, $_[1]) unless $_[0]->{match}; + $_[0]->{match}->($_[1]); } sub _execute_with { @@ -100,7 +100,7 @@ sub _setup_dispatchables { : undef ); my $new = $class->_build_dispatcher({ - matches => $matcher, + match => $matcher, call => sub { shift; shift->_run_with_self($dispatch_sub, @_) },