X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F030_roles%2Ffailing%2F006_role_exclusion.t;fp=t-failing%2F030_roles%2F006_role_exclusion.t;h=e60a76834bfa96bd5ddab7b4fc557ee3f76200c4;hb=9864f0e4ba233c5f30ad6dc7c484ced43d883d27;hp=32eed57e146b6afb1a357253ff6b75f8e8ec06a6;hpb=8845df4dd6432e3164d078ade741409061adae9f;p=gitmo%2FMouse.git diff --git a/t-failing/030_roles/006_role_exclusion.t b/t/030_roles/failing/006_role_exclusion.t similarity index 94% rename from t-failing/030_roles/006_role_exclusion.t rename to t/030_roles/failing/006_role_exclusion.t index 32eed57..e60a768 100644 --- a/t-failing/030_roles/006_role_exclusion.t +++ b/t/030_roles/failing/006_role_exclusion.t @@ -1,13 +1,9 @@ #!/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 => 22; use Test::Exception; =pod @@ -125,4 +121,3 @@ ok(My::Test4->meta->does_role('Molecule::Organic'), '... My::Test4 meat does_rol ok(My::Test4->meta->excludes_role('Molecule::Inorganic'), '... My::Test4 meta excludes Molecule::Organic'); ok(!My::Test4->does('Molecule::Inorganic'), '... My::Test4 does Molecule::Inorganic'); -done_testing;