X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Antlers.git;a=blobdiff_plain;f=lib%2FMooseX%2FAntlers%2FCompiler.pm;fp=lib%2FMooseX%2FAntlers%2FCompiler.pm;h=667026d12538a9130678d53efb063e12d48969c5;hp=0c0345a2a5acc32ec4ee4966f4ae0b59ea8c2689;hb=fec6319b820dc7f7890a2516b10ff99bfb8bda0b;hpb=3691d03f42d4f21f78221c4d6edb9d03a950c896

diff --git a/lib/MooseX/Antlers/Compiler.pm b/lib/MooseX/Antlers/Compiler.pm
index 0c0345a..667026d 100644
--- a/lib/MooseX/Antlers/Compiler.pm
+++ b/lib/MooseX/Antlers/Compiler.pm
@@ -75,15 +75,16 @@ sub compiled_source {
   }
   my $im_construct = $im_et->serialized_construction($all_refs);
   my $preamble = tt strip q{
+    use Sub::Name ();
     my %replay_has;
     my %has_args;
     BEGIN {
       %replay_has = (
-  [% FOREACH a IN attr_construct_h %]
+    [% FOREACH a IN attr_construct_h %]
         [% a.key %] => sub {
           [% a.value %]
         }
-  [% END %]
+    [% END %]
       );
     }
     sub MooseX::Antlers::ImmutableHackFor::[% target %]::make_immutable {