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(@_);
}
is_deeply($model_attributes,
{
foo => 'bar', # From __PACKAGE__ default config
- bar => 'baz', # Merged from my environment hash
+ bar => 'baz', # Merged from my environment hash,
+ catalyst_component_name => 'TestApp::Model::TestModel',
},
'JSON for top-level :: param with hash merge');