use warnings;
use strict;
use JSON::Any;
-
+use MRO::Compat;
=head1 NAME
Catalyst::Plugin::ConfigLoader::Environment - Configure your
=cut
-our $VERSION = '0.05';
+our $VERSION = '0.06';
=head1 SYNOPSIS
=cut
sub setup {
- my $c = shift;
+ my $c = shift;
my $prefix = Catalyst::Utils::class2env($c);
my %env;
grep { /^${prefix}[_](.+)$/ && ($env{$1}=$ENV{$_})} keys %ENV;
$c->config( $var => $val );
}
- return $c->NEXT::setup(@_);
+ return $c->maybe::next::method(@_);
}