Revert autogenerated tests. Tests should not changed radically.

[gitmo/Mouse.git] / t / 050_metaclasses / failing / 023_easy_init_meta.t

diff --git a/t-failing/050_metaclasses/023_easy_init_meta.t b/t/050_metaclasses/failing/023_easy_init_meta.t
similarity index 57%
rename from t-failing/050_metaclasses/023_easy_init_meta.t
rename to t/050_metaclasses/failing/023_easy_init_meta.t
index ed85866..6da26d8 100644 (file)
--- a/t-failing/050_metaclasses/023_easy_init_meta.t
+++ b/t/050_metaclasses/failing/023_easy_init_meta.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 => 13;
 use Test::Mouse qw(does_ok);
 
 {
@@ -30,12 +26,9 @@ use Test::Mouse qw(does_ok);
     use Mouse::Exporter;
 
     Mouse::Exporter->setup_import_methods(
-        class_metaroles => {
-            class     => ['Foo::Trait::Class'],
-            attribute => ['Foo::Trait::Attribute'],
-        },
-        role_metaroles   => { role => ['Foo::Trait::Class'] },
-        base_class_roles => ['Foo::Role::Base'],
+        metaclass_roles           => ['Foo::Trait::Class'],
+        attribute_metaclass_roles => ['Foo::Trait::Attribute'],
+        base_class_roles          => ['Foo::Role::Base'],
     );
 }
 
@@ -52,19 +45,17 @@ use Test::Mouse qw(does_ok);
 }
 
 {
-    package Foo::Exporter::WithMoose;
+    package Foo::Exporter::WithMouse;
     use Mouse ();
     use Mouse::Exporter;
 
-    my ( $import, $unimport, $init_meta )
-        = Mouse::Exporter->build_import_methods(
-        also            => 'Mouse',
-        class_metaroles => {
-            class     => ['Foo::Trait::Class'],
-            attribute => ['Foo::Trait::Attribute'],
-        },
-        base_class_roles => ['Foo::Role::Base'],
-        install          => [qw(import unimport)],
+    my ($import, $unimport, $init_meta) =
+        Mouse::Exporter->build_import_methods(
+            also                      => 'Mouse',
+            metaclass_roles           => ['Foo::Trait::Class'],
+            attribute_metaclass_roles => ['Foo::Trait::Attribute'],
+            base_class_roles          => ['Foo::Role::Base'],
+            install                   => [qw(import unimport)],
         );
 
     sub init_meta {
@@ -78,7 +69,7 @@ use Test::Mouse qw(does_ok);
 
 {
     package Foo2;
-    Foo::Exporter::WithMoose->import;
+    Foo::Exporter::WithMouse->import;
 
     has(foo => (is => 'ro'));
 
@@ -98,18 +89,17 @@ use Test::Mouse qw(does_ok);
 }
 
 {
-    package Foo::Exporter::WithMooseRole;
+    package Foo::Exporter::WithMouseRole;
     use Mouse::Role ();
     use Mouse::Exporter;
 
-    my ( $import, $unimport, $init_meta )
-        = Mouse::Exporter->build_import_methods(
-        also           => 'Mouse::Role',
-        role_metaroles => {
-            role      => ['Foo::Trait::Class'],
-            attribute => ['Foo::Trait::Attribute'],
-        },
-        install => [qw(import unimport)],
+    my ($import, $unimport, $init_meta) =
+        Mouse::Exporter->build_import_methods(
+            also                      => 'Mouse::Role',
+            metaclass_roles           => ['Foo::Trait::Class'],
+            attribute_metaclass_roles => ['Foo::Trait::Attribute'],
+            base_class_roles          => ['Foo::Role::Base'],
+            install                   => [qw(import unimport)],
         );
 
     sub init_meta {
@@ -123,10 +113,8 @@ use Test::Mouse qw(does_ok);
 
 {
     package Foo2::Role;
-    Foo::Exporter::WithMooseRole->import;
+    Foo::Exporter::WithMouseRole->import;
 
     ::isa_ok(Foo2::Role->meta, 'Mouse::Meta::Role');
     ::does_ok(Foo2::Role->meta, 'Foo::Trait::Class');
 }
-
-done_testing;