fix coderef naming to avoid confusing autoclean
[gitmo/Moo.git] / xt / moo-roles-into-moose-class.t
index d1d0a6c..ac17d30 100644 (file)
@@ -5,7 +5,8 @@ use Test::More;
 {
     package Foo;
     use Moo::Role;
-    use namespace::autoclean;
+    # if we autoclean here there's nothing left and then load_class tries
+    # to require Foo during Moose application and everything breaks.
 }
 {
     package Bar;
@@ -29,6 +30,8 @@ use Test::More;
 
 ::is(Baz->can('thing'), Bar->can('thing'), 'Role copies method correctly');
 ::ok(Baz->can('attr'), 'Attr accessor correct');
+::ok(!Bar->can('has'), 'Moo::Role sugar removed by autoclean');
+::ok(!Bar->can('with'), 'Role::Tiny sugar removed by autoclean');
 ::ok(!Baz->can('has'), 'Sugar not copied');
 
 {