Better test =]

[gitmo/Perl-Critic-Dynamic-Moose.git] / t / DynamicMoose / ProhibitPublicBuilders.run

diff --git a/t/DynamicMoose/ProhibitPublicBuilders.run b/t/DynamicMoose/ProhibitPublicBuilders.run
index c38a3df..4232a46 100644 (file)
--- a/t/DynamicMoose/ProhibitPublicBuilders.run
+++ b/t/DynamicMoose/ProhibitPublicBuilders.run
@@ -143,12 +143,13 @@ has foo => (
 ## cut
 
 for (1 .. 5) {
+    my $builder = "build_foo_$_";
     Class::MOP::Class->create(
         "Foo$_",
         attributes => [
             Class::MOP::Attribute->new(
                 name => "foo_$_",
-                builder => "build_foo_$_",
+                builder => $builder,
             ),
         ],
     );