}
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 {