Merge branch 'stable'
[gitmo/Class-MOP.git] / t / 085_load_class_gvstash_detect_bug.t
CommitLineData
860f85ab 1use strict;
2use warnings;
86a4d873 3use Test::More;
871e9eb5 4use Test::Fatal;
860f85ab 5
6use Class::MOP;
7use lib 't/lib';
8
871e9eb5 9is( exception {
860f85ab 10 Class::MOP::load_class('TestClassLoaded::Sub');
871e9eb5 11}, undef );
860f85ab 12
13TestClassLoaded->can('a_method');
14
871e9eb5 15is( exception {
860f85ab 16 Class::MOP::load_class('TestClassLoaded');
871e9eb5 17}, undef );
860f85ab 18
871e9eb5 19is( exception {
860f85ab 20 TestClassLoaded->a_method;
871e9eb5 21}, undef );
86a4d873 22
23done_testing;