X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FRequest%2FREST.pm;h=0fcd31cd09a250eb21724b77ce823ca63386097d;hb=HEAD;hp=0dacfc6a8ee262e3d04535994c7d4bcc9e819d27;hpb=83273f945c722f1a05e584fb44c8664c1ab4c4b4;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Request/REST.pm b/lib/Catalyst/Request/REST.pm index 0dacfc6..0fcd31c 100644 --- a/lib/Catalyst/Request/REST.pm +++ b/lib/Catalyst/Request/REST.pm @@ -1,4 +1,5 @@ package Catalyst::Request::REST; + use Moose; use Catalyst::Utils; @@ -7,9 +8,6 @@ use namespace::autoclean; extends 'Catalyst::Request'; with 'Catalyst::TraitFor::Request::REST'; -our $VERSION = '0.88'; -$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.. @@ -23,7 +21,7 @@ sub _insert_self_into { my $req_class = $app->request_class; return if $req_class->isa($class); my $req_class_meta = Moose->init_meta( for_class => $req_class ); - my $role = $self->_related_role; + my $role = $class->_related_role; return if $req_class_meta->does_role($role); if ($req_class eq 'Catalyst::Request') { $app->request_class($class);