X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FController%2FREST.pm;h=defe764410d5db0b664a8db3aeb951b2aed71299;hb=8894935c030d66c4a113d3e28b7a9a1c58f8bf04;hp=090284ee2110937da0cf145ae4dd307b44726d78;hpb=355d4385698315db0f6f1e253836292fecd3b05b;p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git diff --git a/lib/Catalyst/Controller/REST.pm b/lib/Catalyst/Controller/REST.pm index 090284e..defe764 100644 --- a/lib/Catalyst/Controller/REST.pm +++ b/lib/Catalyst/Controller/REST.pm @@ -2,7 +2,7 @@ package Catalyst::Controller::REST; use Moose; use namespace::autoclean; -our $VERSION = '0.87'; +our $VERSION = '0.91'; $VERSION = eval $VERSION; =head1 NAME @@ -36,7 +36,9 @@ Catalyst::Controller::REST - A RESTful controller # Answer PUT requests to "thing" sub thing_PUT { - $radiohead = $req->data->{radiohead}; + my ( $self, $c ) = @_; + + $radiohead = $c->req->data->{radiohead}; $self->status_created( $c, @@ -401,7 +403,7 @@ sub status_no_content { my $c = shift; $c->response->status(204); $self->_set_entity( $c, undef ); - return 1.; + return 1; } =item status_multiple_choices @@ -592,6 +594,10 @@ action classes: sub serialize : ActionClass('Serialize') {} +If you need to deserialize multipart requests (i.e. REST data in +one part and file uploads in others) you can do so by using the +L action class. + =back =head1 A MILD WARNING @@ -623,4 +629,6 @@ You may distribute this code under the same terms as Perl itself. =cut +__PACKAGE__->meta->make_immutable; + 1;