Commit | Line | Data |
---|---|---|
efc1e387 | 1 | use Test::More; |
2 | ||
3 | BEGIN { | |
4 | eval { require namespace::autoclean ; 1 } | |
5 | or plan skip_all => 'test requires namespace::autoclean'; | |
6 | } | |
7 | ||
8 | BEGIN { | |
9 | package Local::Role; | |
10 | use Role::Tiny; | |
11 | sub foo { 1 }; | |
12 | } | |
13 | ||
14 | BEGIN { | |
15 | package Local::Class; | |
16 | use namespace::autoclean; | |
17 | use Role::Tiny::With; | |
18 | with qw( Local::Role ); | |
19 | }; | |
20 | ||
21 | can_ok 'Local::Class', 'foo'; | |
22 | can_ok 'Local::Class', 'does'; | |
23 | ||
24 | done_testing(); |