Remove not_implemented from the list of allowed methods

hdp · Jul 2, 2012 · 258f6e7 · 258f6e7
1 parent a08d447
commit 258f6e7
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/lib/Catalyst/Action/REST.pm b/lib/Catalyst/Action/REST.pm
@@ -157,6 +157,7 @@ sub get_allowed_methods {
         @{ Class::Inspector->methods($class) }
     };
     $methods->{'HEAD'} = 1 if $methods->{'GET'};
+    delete $methods->{'not_implemented'};
     return keys %$methods;
 };
 

diff --git a/t/lib/Test/Catalyst/Action/REST/Controller/REST.pm b/t/lib/Test/Catalyst/Action/REST/Controller/REST.pm
@@ -83,4 +83,11 @@ sub opts_GET {
     $self->status_ok( $c, entity => { opts => 'worked' } );
 }
 
+sub opts_not_implemented {
+    my ( $self, $c ) = @_;
+    $c->res->status(405);
+    $c->res->header('Allow' => [qw(GET HEAD)]);
+    $c->res->body('Not implemented');
+}
+
 1;