X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F020_attributes%2F017_attribute_traits_n_meta.t;h=a51142d67b26ce488c48397ca03a6c6a980a8c69;hb=1808c2dab86d0317d10f70d3a7a923e97daf54bb;hp=2aa111496e993e41546d6c969849cec6d0cb1eab;hpb=d03bd989b97597428b460d7f9a021e2931893fa0;p=gitmo%2FMoose.git diff --git a/t/020_attributes/017_attribute_traits_n_meta.t b/t/020_attributes/017_attribute_traits_n_meta.t index 2aa1114..a51142d 100644 --- a/t/020_attributes/017_attribute_traits_n_meta.t +++ b/t/020_attributes/017_attribute_traits_n_meta.t @@ -54,14 +54,14 @@ use Test::Moose; my $c = My::Class->new(bar => 100); isa_ok($c, 'My::Class'); -is($c->bar, 100, '... got the right value for bar'); +is($c->bar, 100, 'got the right value for bar'); can_ok($c, 'baz'); -is($c->baz, 100, '... got the right value for baz'); +is($c->baz, 100, 'got the right value for baz'); isa_ok($c->meta->get_attribute('bar'), 'My::Meta::Attribute::DefaultReadOnly'); does_ok($c->meta->get_attribute('bar'), 'My::Attribute::Trait'); -is($c->meta->get_attribute('bar')->_is_metadata, 'ro', '... got the right metaclass customization'); +is($c->meta->get_attribute('bar')->_is_metadata, 'ro', 'got the right metaclass customization');