Commit | Line | Data |
---|---|---|
860f85ab | 1 | use strict; |
2 | use warnings; | |
86a4d873 | 3 | use Test::More; |
860f85ab | 4 | use Test::Exception; |
5 | ||
6 | use Class::MOP; | |
7 | use lib 't/lib'; | |
8 | ||
9 | lives_ok { | |
10 | Class::MOP::load_class('TestClassLoaded::Sub'); | |
11 | }; | |
12 | ||
13 | TestClassLoaded->can('a_method'); | |
14 | ||
15 | lives_ok { | |
16 | Class::MOP::load_class('TestClassLoaded'); | |
17 | }; | |
18 | ||
19 | lives_ok { | |
20 | TestClassLoaded->a_method; | |
86a4d873 | 21 | }; |
22 | ||
23 | done_testing; |