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=4d96e6cc3d80f0362565cbbea9ebb8d71cbb5cd6;hb=9864f0e4ba233c5f30ad6dc7c484ced43d883d27;hp=5ffd186ceb6c7bfeba1a4f06a5da720b7742ca07;hpb=8845df4dd6432e3164d078ade741409061adae9f;p=gitmo%2FMouse.git diff --git a/t/020_attributes/017_attribute_traits_n_meta.t b/t/020_attributes/017_attribute_traits_n_meta.t index 5ffd186..4d96e6c 100644 --- a/t/020_attributes/017_attribute_traits_n_meta.t +++ b/t/020_attributes/017_attribute_traits_n_meta.t @@ -1,12 +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 Test::More; +use lib 't/lib'; + +use Test::More tests => 7; use Test::Exception; use Test::Mouse; @@ -66,4 +65,6 @@ 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'); -done_testing; + + +