X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Controller-DBIC-API.git;a=blobdiff_plain;f=lib%2FCatalyst%2FController%2FDBIC%2FAPI%2FREST.pm;h=df5811512164d97b78bee84b74fbe4c94d9e8c73;hp=d615b8a080dcbcbb71d7138fc2bc88b8f17a8e67;hb=26e9dcd6d31111877fd0b97f5c6743fab226e015;hpb=b66d43106c928f395d6e0628f9f80b72a274b9d8 diff --git a/lib/Catalyst/Controller/DBIC/API/REST.pm b/lib/Catalyst/Controller/DBIC/API/REST.pm index d615b8a..df58115 100644 --- a/lib/Catalyst/Controller/DBIC/API/REST.pm +++ b/lib/Catalyst/Controller/DBIC/API/REST.pm @@ -47,7 +47,7 @@ Calls L. =cut -sub update_or_create_objects : Chained('objects_no_id') PathPart('') Does('MatchRequestMethod') Method('POST') Method('PUT') Args(0) +sub update_or_create_objects : POST PUT Chained('objects_no_id') PathPart('') Args(0) { my ( $self, $c ) = @_; $self->update_or_create($c); @@ -64,7 +64,7 @@ Calls L. =cut -sub delete_many_objects : Chained('objects_no_id') PathPart('') Does('MatchRequestMethod') Method('DELETE') Args(0) +sub delete_many_objects : DELETE Chained('objects_no_id') PathPart('') Args(0) { my ( $self, $c ) = @_; $self->delete($c); @@ -81,7 +81,7 @@ Calls L. =cut -sub list_objects : Chained('objects_no_id') PathPart('') Does('MatchRequestMethod') Method('GET') Args(0) +sub list_objects : GET Chained('objects_no_id') PathPart('') Args(0) { my ( $self, $c ) = @_; $self->list($c); @@ -98,7 +98,7 @@ Calls L. =cut -sub update_or_create_one_object : Chained('object_with_id') PathPart('') Does('MatchRequestMethod') Method('POST') Method('PUT') Args(0) +sub update_or_create_one_object : POST PUT Chained('object_with_id') PathPart('') Args(0) { my ( $self, $c ) = @_; $self->update_or_create($c); @@ -115,7 +115,7 @@ Calls L. =cut -sub delete_one_object : Chained('object_with_id') PathPart('') Does('MatchRequestMethod') Method('DELETE') Args(0) +sub delete_one_object : DELETE Chained('object_with_id') PathPart('') Args(0) { my ( $self, $c ) = @_; $self->delete($c); @@ -132,7 +132,7 @@ Calls L. =cut -sub list_one_object : Chained('object_with_id') PathPart('') Does('MatchRequestMethod') Method('GET') Args(0) +sub list_one_object : GET Chained('object_with_id') PathPart('') Args(0) { my ( $self, $c ) = @_; $self->item($c);