my $instance = $self->$orig(@_);
if ( $accept_context_args && $instance->can($ac_sub) ) {
- # FIXME - MADNESS!
- # how the heck does this warn CODE???????????
- warn ref $accept_context_args if ref $accept_context_args ne 'ARRAY';
return $instance->$ac_sub( @$accept_context_args );
}
extends 'Catalyst';
use namespace::autoclean;
- confess("No default container") unless $ENV{TEST_APP_CURRENT_CONTAINER};
-Class::MOP::load_class($ENV{TEST_APP_CURRENT_CONTAINER}); # FIXME!
-# Custom container name is silently ignored if the class doesn't exist!
+confess("No default container") unless $ENV{TEST_APP_CURRENT_CONTAINER};
+
__PACKAGE__->config(
container_class => $ENV{TEST_APP_CURRENT_CONTAINER}
);