change 404 action name

dr-kd · Sep 12, 2009 · d53031b · d53031b
1 parent e24bd2e
commit d53031b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Survey-Perl/lib/Survey/Perl/Controller/Root.pm b/Survey-Perl/lib/Survey/Perl/Controller/Root.pm
@@ -13,7 +13,7 @@ sub index :Path :Args(0) {
     $c->res->body('<a href="'. $c->uri_for('/survey') . '">Survey</a>');
 }
 
-sub default :Path {
+sub do_404 :Path {
     my ( $self, $c ) = @_;
     $c->res->status(404);
     $c->res->body('Not found');