Regenerate test files
[gitmo/Mouse.git] / t / 030_roles / 018_runtime_roles_w_params.t
index aa1a02b..8785cfd 100644 (file)
@@ -1,13 +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 => 21;
+use Test::More;
+$TODO = q{Mouse is not yet completed};
 use Test::Exception;
 
 
-
 {
     package Foo;
     use Mouse;
@@ -50,10 +53,7 @@ use Test::Exception;
 
     is($foo->bar, 'BAR', '... got the expect value');
     ok($foo->can('baz'), '... we have baz method now');
-    {
-        local $TODO = 'rebless_params is not implemented';
-        is($foo->baz, 'FOO-BAZ', '... got the expect value');
-    }
+    is($foo->baz, 'FOO-BAZ', '... got the expect value');
 }
 
 # with extra params ...
@@ -68,15 +68,9 @@ use Test::Exception;
         Bar->meta->apply($foo, (rebless_params => { bar => 'FOO-BAR', baz => 'FOO-BAZ' }))
     } '... this works';
 
-    {
-        local $TODO = 'rebless params is not implemented';
-        is($foo->bar, 'FOO-BAR', '... got the expect value');
-    }
+    is($foo->bar, 'FOO-BAR', '... got the expect value');
     ok($foo->can('baz'), '... we have baz method now');
-    {
-        local $TODO = 'rebless params is not implemented';
-        is($foo->baz, 'FOO-BAZ', '... got the expect value');
-    }
+    is($foo->baz, 'FOO-BAZ', '... got the expect value');
 }
 
-
+done_testing;