From: Shawn M Moore <sartak@gmail.com>
Date: Tue, 28 Apr 2009 08:53:07 +0000 (-0400)
Subject: Better test =]
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b577788cc610931712d5f00d14682243f91615fc;p=gitmo%2FPerl-Critic-Dynamic-Moose.git

Better test =]
---

diff --git a/t/DynamicMoose/ProhibitPublicBuilders.run b/t/DynamicMoose/ProhibitPublicBuilders.run
index c38a3df..4232a46 100644
--- 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,
             ),
         ],
     );