X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F050_metaclasses%2F013_metaclass_traits.t;h=06159a094e5373b6c168046f5225beee86c7abcf;hb=9864f0e4ba233c5f30ad6dc7c484ced43d883d27;hp=c04959f100664f0d81d5ea59e94f8fb004483a50;hpb=8845df4dd6432e3164d078ade741409061adae9f;p=gitmo%2FMouse.git diff --git a/t/050_metaclasses/013_metaclass_traits.t b/t/050_metaclasses/013_metaclass_traits.t index c04959f..06159a0 100644 --- a/t/050_metaclasses/013_metaclass_traits.t +++ b/t/050_metaclasses/013_metaclass_traits.t @@ -1,14 +1,11 @@ #!/usr/bin/perl -# This is automatically generated by author/import-moose-test.pl. -# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!! -use t::lib::MooseCompat; use strict; use warnings; use lib 't/lib', 'lib'; -use Test::More; +use Test::More tests => 32; use Test::Exception; { @@ -176,6 +173,7 @@ is( Role::Foo->meta()->simple(), 5, '... and error provides a useful explanation' ); } + { package Foo::Subclass; @@ -223,5 +221,3 @@ lives_ok { is( $instance->an_attr, 'value', 'Can get value' ); } 'Can create instance and access attributes'; - -done_testing;