use Carp qw/croak/;
require Catalyst::Test; # Do not call import
+use Class::Load qw(load_class is_class_loaded);
use Encode qw();
use HTML::Entities;
use Test::WWW::Mechanize;
unless ($ENV{CATALYST_SERVER}) {
croak "catalyst_app attribute is required unless CATALYST_SERVER env variable is set"
unless $self->has_catalyst_app;
- Class::MOP::load_class($self->catalyst_app)
- unless (Class::MOP::is_class_loaded($self->catalyst_app));
+ load_class($self->catalyst_app)
+ unless (is_class_loaded($self->catalyst_app));
}
}
my ($class, $app) = @_;
if (defined $app) {
- Class::MOP::load_class($app)
- unless (Class::MOP::is_class_loaded($app));
+ load_class($app)
+ unless (is_class_loaded($app));
$APP_CLASS = $app;
}