X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FREST.pm;h=b9e84cfdf28642e6ed0c21087d4fda77820a9b68;hb=665a446debcdb5bc02aae2034ad4172a7899e054;hp=d787fec3cf408af49f50c7c02cbf9300105d3424;hpb=2f91bf68db8fc4018e4f2fe9952f6caf1d1db2bf;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Action/REST.pm b/lib/Catalyst/Action/REST.pm index d787fec..b9e84cf 100644 --- a/lib/Catalyst/Action/REST.pm +++ b/lib/Catalyst/Action/REST.pm @@ -1,6 +1,6 @@ # # REST.pm -# Created by: Adam Jacob, Marchex, +# Created by: Adam Jacob, Marchex, # Created on: 10/12/2006 03:00:32 PM PDT # # $Id$ @@ -12,17 +12,20 @@ use warnings; use base 'Catalyst::Action'; use Class::Inspector; +use Catalyst; use Catalyst::Request::REST; -use 5.8.1; +use Catalyst::Controller::REST; -our - $VERSION = '0.41'; +BEGIN { require 5.008001; } -# This is wrong in several ways. First, there's no guarantee that -# Catalyst.pm has not been subclassed. Two, there's no guarantee that -# the user isn't already using their request subclass. -Catalyst->request_class('Catalyst::Request::REST') - unless Catalyst->request_class->isa('Catalyst::Request::REST'); +our $VERSION = '0.71'; + +sub new { + my $class = shift; + my $config = shift; + Catalyst::Request::REST->_insert_self_into( $config->{class} ); + return $class->SUPER::new($config, @_); +} =head1 NAME @@ -153,16 +156,46 @@ a sensible set of defaults for a controller doing REST. L, L -=head1 AUTHOR +=head1 TROUBLESHOOTING -Adam Jacob , with lots of help from mst and jrockway +=over 4 + +=item Q: I'm getting a "415 Unsupported Media Type" error. What gives?! + +A: Most likely, you haven't set Content-type equal to "application/json", or one of the +accepted return formats. You can do this by setting it in your query string thusly: +?content-type=application%2Fjson (where %2F == / uri escaped). + +**NOTE** Apache will refuse %2F unless configured otherise. +Make sure AllowEncodedSlashes On is in your httpd.conf file in order for this to run smoothly. + +=cut + +=cut -Marchex, Inc. paid me while I developed this module. (http://www.marchex.com) -=head1 CONTRIBUTERS + + +=head1 MAINTAINER + +J. Shirley + +=head1 CONTRIBUTORS + +Christopher Laco + +Luke Saunders + +John Goulah Daisuke Maki +=head1 AUTHOR + +Adam Jacob , with lots of help from mst and jrockway + +Marchex, Inc. paid me while I developed this module. (http://www.marchex.com) + =head1 LICENSE You may distribute this code under the same terms as Perl itself.