use strict;
use warnings;
+use MRO::Compat;
sub setup {
my $app = shift;
- my $ret = $app->NEXT::setup( @_ );
+ my $ret = $app->maybe::next::method( @_ );
my $regexes = $app->config->{cache}{key_regexes} ||= [];
return $backend if $meta{key} =~ $re;
}
- $c->NEXT::choose_cache_backend( %meta );
+ $c->maybe::next::method( %meta );
}
__PACKAGE__;