Give test a useful name
[gitmo/MooseX-ClassAttribute.git] / t / 08-role-composition.t
index 93ecdd1..44e9af2 100644 (file)
@@ -28,8 +28,9 @@ use Test::More;
     with( 'Role2', 'Role' );
 }
 
-{
-    can_ok( 'Bar', 'CA', );
-}
+ok(
+    Bar->can('CA'),
+    'Class attributes are preserved during role composition'
+);
 
 done_testing();