diff options
-rw-r--r-- | inc/MakeMaker.pm | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/inc/MakeMaker.pm b/inc/MakeMaker.pm index 1a1eed5..3d31c0d 100644 --- a/inc/MakeMaker.pm +++ b/inc/MakeMaker.pm @@ -7,11 +7,15 @@ around _build_MakeFile_PL_template => sub { my $orig = shift; my $self = shift; my $tmpl = $self->$orig; - return $tmpl . <<'TMPL' -use Devel::CallParser 'callparser1_h'; + my $extra = <<'EXTRA'; +use Devel::CallParser 'callparser1_h', 'callparser_linkable'; open my $fh, '>', 'callparser1.h' or die "Couldn't write to callparser1.h"; $fh->print(callparser1_h); -TMPL +$WriteMakefileArgs{OBJECT} = join(' ', callparser_linkable); +EXTRA + $tmpl =~ s/^(WriteMakefile\()/$extra\n$1/m + or die "Couldn't fix template"; + return $tmpl; }; __PACKAGE__->meta->make_immutable; |