diff options
| -rw-r--r-- | lib/Narwhal.pm | 2 | ||||
| -rw-r--r-- | lib/Narwhal/RouteBuilder/HTTPMethod.pm | 5 |
2 files changed, 4 insertions, 3 deletions
diff --git a/lib/Narwhal.pm b/lib/Narwhal.pm index aae8a25..4437027 100644 --- a/lib/Narwhal.pm +++ b/lib/Narwhal.pm @@ -39,7 +39,7 @@ router as { route '/page/:page_name' => 'wiki.page', ( page_name => { isa => 'Str' }, ); - route '/edit/:page_name' => 'edit', ( + route '/edit/:page_name' => 'http-method:edit', ( page_name => { isa => 'Str' }, ); }, ( diff --git a/lib/Narwhal/RouteBuilder/HTTPMethod.pm b/lib/Narwhal/RouteBuilder/HTTPMethod.pm index fb2f124..9631616 100644 --- a/lib/Narwhal/RouteBuilder/HTTPMethod.pm +++ b/lib/Narwhal/RouteBuilder/HTTPMethod.pm @@ -9,9 +9,10 @@ sub import { class => __PACKAGE__, route_spec => sub { my $spec = shift; - return if ref($spec) || $spec !~ /^\w+$/; + return if ref($spec); + return unless $spec =~ /^http-method:(\w+)$/; return { - action => $spec, + action => $1, }; }, ); |