From: Tomas Doran (t0m) Date: Thu, 23 Apr 2009 13:48:46 +0000 (+0100) Subject: As per usual, I mean maybe::next::method X-Git-Tag: 0.07~6 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Component-ACCEPT_CONTEXT.git;a=commitdiff_plain;h=16beaa34faea61ca82bde58b02237776ff61804d As per usual, I mean maybe::next::method --- diff --git a/lib/Catalyst/Component/ACCEPT_CONTEXT.pm b/lib/Catalyst/Component/ACCEPT_CONTEXT.pm index 0d6815d..523a4c1 100644 --- a/lib/Catalyst/Component/ACCEPT_CONTEXT.pm +++ b/lib/Catalyst/Component/ACCEPT_CONTEXT.pm @@ -121,7 +121,7 @@ sub ACCEPT_CONTEXT { $self->{context} = $context; weaken($self->{context}); - return $self->next::method($context, @_) || $self; + return $self->maybe::next::method($context, @_) || $self; } =head2 COMPONENT @@ -136,7 +136,7 @@ sub COMPONENT { my $args = shift; $args->{context} = $app; weaken($args->{context}) if ref $args->{context}; - return $class->next::method($app, $args, @_); + return $class->maybe::next::method($app, $args, @_); } =head1 AUTHOR