convert to using Test::Requires, and add explicit test counts
[gitmo/MooseX-ClassAttribute.git] / t / 08-role-composition.t
CommitLineData
f2aa2fe5 1use strict;
2use warnings;
3272340d 3
4use Test::More tests => 1;
ddc8a57e 5use Test::Exception;
f2aa2fe5 6
7lives_ok {
8 Bar->new->_connections;
9} 'finds a class attribute under role composition';
10
f2aa2fe5 11
12BEGIN {
13
14package Role;
15use Moose::Role;
16use MooseX::ClassAttribute;
17
18class_has '_connections' => (
19 is => 'ro',
20 isa => 'HashRef',
21 default => sub { {} },
22 );
23
24package Role2;
25use Moose::Role;
26
27package Bar;
28use Moose;
29
30with ('Role2','Role');
31
32}