projects
/
gitmo/Mouse.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Begin adding tests for Squirrel::Role
[gitmo/Mouse.git]
/
t
/
402-basic-role-application.t
1
#!/usr/bin/env perl
2
use strict;
3
use warnings;
4
use Test::More tests => 1;
5
6
do {
7
package Role;
8
use Mouse::Role;
9
10
has 'attr';
11
12
no Mouse::Role;
13
};
14
15
do {
16
package Class;
17
use Mouse;
18
with 'Role';
19
20
no Mouse;
21
};
22
23
ok(Class->meta->has_attribute('attr'), "role application added the attribute");
24