X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F050_metaclasses%2F004_moose_for_meta.t;fp=t%2F050_metaclasses%2F004_moose_for_meta.t;h=06738db8a0445992afe77e4ddaa687577e917185;hb=1808c2dab86d0317d10f70d3a7a923e97daf54bb;hp=003e2f7fb65bce4b8c1bf72a815d08fba8ec5743;hpb=6b584f6c4dc1c2108c1bc233caec49627b2cce04;p=gitmo%2FMoose.git diff --git a/t/050_metaclasses/004_moose_for_meta.t b/t/050_metaclasses/004_moose_for_meta.t index 003e2f7..06738db 100644 --- a/t/050_metaclasses/004_moose_for_meta.t +++ b/t/050_metaclasses/004_moose_for_meta.t @@ -38,7 +38,7 @@ isa_ok($anon, 'Class::MOP::Class'); is_deeply( [ $anon->superclasses ], [ 'Moose::Object' ], - '... got the default superclasses'); + 'got the default superclasses'); { package My::Meta::Attribute::DefaultReadOnly; @@ -61,9 +61,9 @@ is_deeply( isa_ok($attr, 'Moose::Meta::Attribute'); isa_ok($attr, 'Class::MOP::Attribute'); - ok($attr->has_reader, '... the attribute has a reader (as expected)'); - ok(!$attr->has_writer, '... the attribute does not have a writer (as expected)'); - ok(!$attr->has_accessor, '... the attribute does not have an accessor (as expected)'); + ok($attr->has_reader, 'the attribute has a reader (as expected)'); + ok(!$attr->has_writer, 'the attribute does not have a writer (as expected)'); + ok(!$attr->has_accessor, 'the attribute does not have an accessor (as expected)'); } { @@ -72,8 +72,8 @@ is_deeply( isa_ok($attr, 'Moose::Meta::Attribute'); isa_ok($attr, 'Class::MOP::Attribute'); - ok(!$attr->has_reader, '... the attribute does not have a reader (as expected)'); - ok(!$attr->has_writer, '... the attribute does not have a writer (as expected)'); - ok($attr->has_accessor, '... the attribute does have an accessor (as expected)'); + ok(!$attr->has_reader, 'the attribute does not have a reader (as expected)'); + ok(!$attr->has_writer, 'the attribute does not have a writer (as expected)'); + ok($attr->has_accessor, 'the attribute does have an accessor (as expected)'); }