projects
/
gitmo/Moo.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
edd271875f38177b3c304edbe64745d614216b40
[gitmo/Moo.git]
/
t
/
subconstructor.t
1
use strictures 1;
2
use Test::More;
3
4
{
5
package SubCon1;
6
7
use Moo;
8
9
has foo => (is => 'ro');
10
11
package SubCon2;
12
13
our @ISA = qw(SubCon1);
14
}
15
16
ok(SubCon2->new, 'constructor completes');
17
18
done_testing;