inc/MakeMaker.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

package inc::MakeMaker;
use Moose;

extends 'Dist::Zilla::Plugin::MakeMaker::Awesome';

override _build_MakeFile_PL_template => sub {
    my $self = shift;

    my $tmpl = super;

    my $depends = <<'END';
%WriteMakefileArgs = (
    %WriteMakefileArgs,
    ($] >= 5.011002
        ? (Devel::CallChecker::callchecker_linkable)
        : (C => [], XS => {})),
);
END

    $tmpl =~ s/(use ExtUtils.*)/$1\nuse Devel::CallChecker;/;
    $tmpl =~ s/(WriteMakefile\()/$depends\n$1/;
    $tmpl .= <<'END';
if ($] >= 5.011002) {
    open my $header, '>', 'callchecker0.h'
        or die "Couldn't open callchecker0.h for writing: $!";
    print $header Devel::CallChecker::callchecker0_h;
    close $header;
}
END

    return $tmpl;
};

__PACKAGE__->meta->make_immutable;
1;