From: Matt S Trout <matthewt@hercule.scsys.co.uk>
Date: Sat, 5 Dec 2009 08:02:26 +0000 (+0000)
Subject: add Sub::Name, clean up indentation
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fec6319b820dc7f7890a2516b10ff99bfb8bda0b;p=gitmo%2FMooseX-Antlers.git

add Sub::Name, clean up indentation
---

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 {