X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FRequest%2FREST.pm;h=e7128ca8fac33ad92341e62fad0997b74b24d568;hb=e527bba30dcea5108b0fb77416fcb4e8ee1e5a38;hp=275be015aecb091b400b95dc266a808a711aee35;hpb=85aa4e18592a1c81b7c2cdd0217b05da74dbea21;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Request/REST.pm b/lib/Catalyst/Request/REST.pm index 275be01..e7128ca 100644 --- a/lib/Catalyst/Request/REST.pm +++ b/lib/Catalyst/Request/REST.pm @@ -7,6 +7,9 @@ use namespace::autoclean; extends 'Catalyst::Request'; with 'Catalyst::TraitFor::Request::REST'; +our $VERSION = '0.87'; +$VERSION = eval $VERSION; + # Please don't take this as a recommended way to do things. # The code below is grotty, badly factored and mostly here for back # compat.. @@ -30,7 +33,7 @@ sub _insert_self_into { roles => ['Catalyst::TraitFor::Request::REST'], cache => 1 ); - $meta->add_method(meta => sub { $meta }); + $meta->_add_meta_method('meta'); $app->request_class($meta->name); } } @@ -54,7 +57,7 @@ Catalyst::Request::REST - A REST-y subclass of Catalyst::Request This is a subclass of C that applies the L role to your request class. That trait -adds a few methods to the request object to faciliate writing REST-y code. +adds a few methods to the request object to facilitate writing REST-y code. This class is only here for backwards compatibility with applications already subclassing this class. New code should use