Revert autogenerated tests. Tests should not changed radically.
[gitmo/Mouse.git] / t / 020_attributes / failing / 028_no_slot_access.t
@@ -1,7 +1,4 @@
 #!/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;
@@ -15,7 +12,7 @@ use warnings;
 }
 
 {
-    package MooseX::SomeAwesomeDBFields;
+    package MouseX::SomeAwesomeDBFields;
 
     # implementation of methods not called in the example deliberately
     # omitted
@@ -63,13 +60,12 @@ use warnings;
     use Mouse;
     use Mouse::Util::MetaRole;
 
-    use Test::More;
-$TODO = q{Mouse is not yet completed};
+    use Test::More tests => 3;
     use Test::Exception;
 
-    Mouse::Util::MetaRole::apply_metaroles(
-        for             => __PACKAGE__,
-        class_metaroles => { instance => ['MooseX::SomeAwesomeDBFields'] },
+    Mouse::Util::MetaRole::apply_metaclass_roles(
+        for_class                => __PACKAGE__,
+        instance_metaclass_roles => ['MouseX::SomeAwesomeDBFields']
     );
 
     lives_ok {
@@ -91,6 +87,4 @@ $TODO = q{Mouse is not yet completed};
 
     lives_ok { __PACKAGE__->meta->make_immutable; }
     "Inling constructor does not use inline_slot_access";
-
-    done_testing;
 }