X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F300_immutable%2F001_immutable_moose.t;h=a9e0434c4aa4e9b94a56d4e60b877b21b22f9672;hb=HEAD;hp=2d725544ba403d01a2ba5cf46b65f8cf2da1a0c1;hpb=73e9153a57c2adfd533a0ac5a3ad843ebfd4c7e7;p=gitmo%2FMouse.git

diff --git a/t/300_immutable/001_immutable_moose.t b/t/300_immutable/001_immutable_moose.t
index 2d72554..a9e0434 100644
--- a/t/300_immutable/001_immutable_moose.t
+++ b/t/300_immutable/001_immutable_moose.t
@@ -1,16 +1,16 @@
 #!/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 tests => 15;
+use Test::More;
 use Test::Exception;
 
-use Test::Mouse;
 use Mouse::Meta::Role;
 
-use lib 't/lib';
-use MooseCompat;
 
 {
     package FooRole;
@@ -44,10 +44,8 @@ use MooseCompat;
     is( Foo->new->bazes, 'many bazes',
         "correct value for 'bazes' before inlining constructor" );
     lives_ok { $meta->make_immutable } "Foo is imutable";
-
     lives_ok { $meta->identifier } "->identifier on metaclass lives";
-    dies_ok { $meta->add_role($foo_role) } "Add Role is locked";
-
+    #dies_ok { $meta->add_role($foo_role) } "Add Role is locked";
     lives_ok { Foo->new } "Inlined constructor works with lazy_build";
     is( Foo->new->foos, 'many foos',
         "correct value for 'foos'  after inlining constructor" );
@@ -55,11 +53,8 @@ use MooseCompat;
         "correct value for 'bars'  after inlining constructor" );
     is( Foo->new->bazes, 'many bazes',
         "correct value for 'bazes' after inlining constructor" );
-    SKIP: {
-        skip "Mouse doesn't supports make_mutable", 2;
-        lives_ok { $meta->make_mutable } "Foo is mutable";
-        lives_ok { $meta->add_role($foo_role) } "Add Role is unlocked";
-    };
+    lives_ok { $meta->make_mutable } "Foo is mutable";
+    #lives_ok { $meta->add_role($foo_role) } "Add Role is unlocked";
 
 }
 
@@ -92,3 +87,5 @@ lives_ok { Baz->meta->make_immutable }
 Nothing here yet, but soon :)
 
 =cut
+
+done_testing;