Separate packages and remove useless do
Dave Rolsky [Fri, 22 May 2009 14:01:07 +0000 (09:01 -0500)]
t/100_bugs/024_anon_method_metaclass.t

index 6079960..ab08bfe 100644 (file)
@@ -2,13 +2,15 @@ use strict;
 use warnings;
 use Test::More tests => 8;
 
-do {
+{
     package Ball;
     use Moose;
+}
 
+{
     package Arbitrary::Roll;
     use Moose::Role;
-};
+}
 
 my $method_meta = Moose::Meta::Class->create_anon_class(
     superclasses => ['Moose::Meta::Method'],