X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F030_roles%2F017_extending_role_attrs.t;fp=t-failing%2F030_roles%2F017_extending_role_attrs.t;h=79514c0ea11bcd6489cff6d18dcfdeaaf45e1064;hb=9864f0e4ba233c5f30ad6dc7c484ced43d883d27;hp=c672ae9396b60b363951735f74b7612c97f65dcf;hpb=8845df4dd6432e3164d078ade741409061adae9f;p=gitmo%2FMouse.git

diff --git a/t-failing/030_roles/017_extending_role_attrs.t b/t/030_roles/017_extending_role_attrs.t
similarity index 89%
rename from t-failing/030_roles/017_extending_role_attrs.t
rename to t/030_roles/017_extending_role_attrs.t
index c672ae9..79514c0 100644
--- a/t-failing/030_roles/017_extending_role_attrs.t
+++ b/t/030_roles/017_extending_role_attrs.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 => 27;
 use Test::Exception;
 
 
+
 =pod
 
 This basically just makes sure that using +name
@@ -176,16 +173,3 @@ is_deeply($quux->quux, ["hi"], "... still has the old ArrayRef value");
     } "or add new types to the union";
 }
 
-{
-    package Role::With::PlusAttr;
-    use Mouse::Role;
-
-    with 'Foo::Role';
-
-    ::throws_ok {
-        has '+bar' => ( is => 'ro' );
-    } qr/has '\+attr' is not supported in roles/,
-        "Test has '+attr' in roles explodes";
-}
-
-done_testing;