X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FRequest%2FREST.pm;h=447680e08592f85831b8b5f6bf0474e99a4dec0f;hb=fec6d454787f6a7c23d1b6a7151a009a3ba0907b;hp=40a9a39fb309fd473a9ba6572c4fd3a8c1e05f92;hpb=e540a1fa72e4a5425c59a9397a3353f4784d726a;p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git

diff --git a/lib/Catalyst/Request/REST.pm b/lib/Catalyst/Request/REST.pm
index 40a9a39..447680e 100644
--- a/lib/Catalyst/Request/REST.pm
+++ b/lib/Catalyst/Request/REST.pm
@@ -10,7 +10,7 @@ package Catalyst::Request::REST;
 use strict;
 use warnings;
 
-use base 'Catalyst::Request';
+use base qw/Catalyst::Request Class::Accessor::Fast/;
 use HTTP::Headers::Util qw(split_header_words);
 
 
@@ -35,8 +35,6 @@ methods are all related to the content types accepted by the client.
 
 =head1 METHODS
 
-=over 4 data
-
 If the request went through the Deserializer action, this method will
 returned the deserialized data structure.
 
@@ -44,6 +42,8 @@ returned the deserialized data structure.
 
 __PACKAGE__->mk_accessors(qw(data accept_only));
 
+=over 4 
+
 =item accepted_content_types
 
 Returns an array reference of content types accepted by the
@@ -141,10 +141,16 @@ sub accepts {
     return grep { $_ eq $type } @{ $self->accepted_content_types };
 }
 
+=back
+
 =head1 AUTHOR
 
 Adam Jacob <adam@stalecoffee.org>, with lots of help from mst and jrockway
 
+=head1 MAINTAINER
+
+J. Shirley <jshirley@cpan.org>
+
 =head1 LICENSE
 
 You may distribute this code under the same terms as Perl itself.