X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F030_roles%2Ffailing%2F012_method_exclusion_in_composition.t;fp=t-failing%2F030_roles%2F012_method_exclusion_in_composition.t;h=d852b17e12e22d1c35567d2324cea13b11647714;hb=9864f0e4ba233c5f30ad6dc7c484ced43d883d27;hp=1bc3b98c725382f486585b983d131f7476a8edc6;hpb=8845df4dd6432e3164d078ade741409061adae9f;p=gitmo%2FMouse.git diff --git a/t-failing/030_roles/012_method_exclusion_in_composition.t b/t/030_roles/failing/012_method_exclusion_in_composition.t similarity index 92% rename from t-failing/030_roles/012_method_exclusion_in_composition.t rename to t/030_roles/failing/012_method_exclusion_in_composition.t index 1bc3b98..d852b17 100644 --- a/t-failing/030_roles/012_method_exclusion_in_composition.t +++ b/t/030_roles/failing/012_method_exclusion_in_composition.t @@ -1,16 +1,13 @@ #!/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; -$TODO = q{Mouse is not yet completed}; +use Test::More tests => 19; use Test::Exception; + { package My::Role; use Mouse::Role; @@ -114,4 +111,5 @@ ok(!My::Foo::Role->meta->requires_method('foo'), '... and the &foo method is not ok(!My::Foo::Role::Other->meta->has_method('foo'), "we dont have a foo method"); ok(My::Foo::Role::Other->meta->requires_method('foo'), '... and the &foo method is required'); -done_testing; + +