Cleanup failing tests

[gitmo/Mouse.git] / Moose-t-failing / 050_metaclasses / 014_goto_moose_import.t

diff --git a/t/050_metaclasses/failing/014_goto_moose_import.t b/Moose-t-failing/050_metaclasses/014_goto_moose_import.t
similarity index 61%
rename from t/050_metaclasses/failing/014_goto_moose_import.t
rename to Moose-t-failing/050_metaclasses/014_goto_moose_import.t
index 063d4f0..4b5ea9e 100644 (file)
--- a/t/050_metaclasses/failing/014_goto_moose_import.t
+++ b/Moose-t-failing/050_metaclasses/014_goto_moose_import.t
@@ -1,16 +1,20 @@
 #!/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 => 8;
+use Test::More;
+$TODO = q{Mouse is not yet completed};
 use Test::Exception;
 
 # Some packages out in the wild cooperate with Mouse by using goto
 # &Mouse::import. we want to make sure it still works.
 
 {
-    package MouseAlike1;
+    package MooseAlike1;
 
     use strict;
     use warnings;
@@ -29,23 +33,23 @@ use Test::Exception;
 {
     package Foo;
 
-    MouseAlike1->import();
+    MooseAlike1->import();
 
     ::lives_ok( sub { has( 'size', is => 'bare' ) },
-                'has was exported via MouseAlike1' );
+                'has was exported via MooseAlike1' );
 
-    MouseAlike1->unimport();
+    MooseAlike1->unimport();
 }
 
 ok( ! Foo->can('has'),
-    'No has sub in Foo after MouseAlike1 is unimported' );
+    'No has sub in Foo after MooseAlike1 is unimported' );
 ok( Foo->can('meta'),
     'Foo has a meta method' );
 isa_ok( Foo->meta(), 'Mouse::Meta::Class' );
 
 
 {
-    package MouseAlike2;
+    package MooseAlike2;
 
     use strict;
     use warnings;
@@ -66,17 +70,19 @@ isa_ok( Foo->meta(), 'Mouse::Meta::Class' );
 {
     package Bar;
 
-    MouseAlike2->import();
+    MooseAlike2->import();
 
     ::lives_ok( sub { has( 'size', is => 'bare' ) },
-                'has was exported via MouseAlike2' );
+                'has was exported via MooseAlike2' );
 
-    MouseAlike2->unimport();
+    MooseAlike2->unimport();
 }
 
 
 ok( ! Bar->can('has'),
-          'No has sub in Bar after MouseAlike2 is unimported' );
+          'No has sub in Bar after MooseAlike2 is unimported' );
 ok( Bar->can('meta'),
     'Bar has a meta method' );
 isa_ok( Bar->meta(), 'Mouse::Meta::Class' );
+
+done_testing;