From: Dave Rolsky Date: Sat, 26 Feb 2011 18:52:00 +0000 (-0600) Subject: Role tests are in a separate file X-Git-Tag: v0.09~2 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2c4a430d7f427eb12dedaa1f444d5c29f3e1b32a;p=gitmo%2FMooseX-SemiAffordanceAccessor.git Role tests are in a separate file --- diff --git a/t/basic.t b/t/basic.t index dc5c65f..520561c 100644 --- a/t/basic.t +++ b/t/basic.t @@ -68,20 +68,4 @@ ok( SAA3->can('set_it'), 'SAA3->set_it does exist' ); ok( !SAA4->can('bare'), 'SAA4->bare does not exist' ); ok( !SAA4->can('set_bare'), 'SAA4->set_bare does not exist' ); -{ - package SAA::Role; - use Moose::Role; - use MooseX::SemiAffordanceAccessor; - has foo => (is => 'rw'); -} - -{ - package SAA::WithRole; - use Moose; - with 'SAA::Role'; -} - -ok( SAA::WithRole->can('foo'), "roles work" ); -ok( SAA::WithRole->can('set_foo'), "roles work" ); - done_testing();