X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize.pm;h=1f6db7d1d09e8d06b7791678490693c72793b66c;hb=def65dcc8983843dd6da4a40e03ee6fbded2b69a;hp=31597cf0b036e3e40e992f733a147169e8ae1e9b;hpb=38c3a9b2841e1f056bf201c987dc0b9c16fafbb5;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Action/Serialize.pm b/lib/Catalyst/Action/Serialize.pm index 31597cf..1f6db7d 100644 --- a/lib/Catalyst/Action/Serialize.pm +++ b/lib/Catalyst/Action/Serialize.pm @@ -11,12 +11,13 @@ use warnings; use base 'Catalyst::Action::SerializeBase'; use Module::Pluggable::Object; +use MRO::Compat; sub execute { my $self = shift; my ( $controller, $c ) = @_; - $self->NEXT::execute(@_); + $self->maybe::next::method(@_); return 1 if $c->req->method eq 'HEAD'; return 1 if length( $c->response->body );