ok($foo_role->has_attribute('bar'), '... FooRole does have the bar attribute');
-is_deeply(
- $foo_role->get_attribute('bar'),
- { is => 'rw', isa => 'Foo' },
- '... got the correct description of the bar attribute');
+is $foo_role->get_attribute('bar')->{is}, 'rw', '... got the correct description of the bar attribute';
ok($foo_role->has_attribute('baz'), '... FooRole does have the baz attribute');
-is_deeply(
- $foo_role->get_attribute('baz'),
- { is => 'ro' },
+is(
+ $foo_role->get_attribute('baz')->{is},
+ 'ro',
'... got the correct description of the baz attribute');
# method modifiers