From 1e2387474a449452b78520b9ad96a8b4b5e99722 Mon Sep 17 00:00:00 2001 From: Harald Pfeiffer Date: Wed, 17 Apr 2019 19:07:19 +0200 Subject: initial commit of source fetch --- .../inc/Module/Install/MakeMaker.pm | 56 ++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 nagios-plugins-contrib-24.20190301~bpo9+1/check_rbl/check_rbl-1.4.4/inc/Module/Install/MakeMaker.pm (limited to 'nagios-plugins-contrib-24.20190301~bpo9+1/check_rbl/check_rbl-1.4.4/inc/Module/Install/MakeMaker.pm') diff --git a/nagios-plugins-contrib-24.20190301~bpo9+1/check_rbl/check_rbl-1.4.4/inc/Module/Install/MakeMaker.pm b/nagios-plugins-contrib-24.20190301~bpo9+1/check_rbl/check_rbl-1.4.4/inc/Module/Install/MakeMaker.pm new file mode 100644 index 0000000..0fd552b --- /dev/null +++ b/nagios-plugins-contrib-24.20190301~bpo9+1/check_rbl/check_rbl-1.4.4/inc/Module/Install/MakeMaker.pm @@ -0,0 +1,56 @@ +#line 1 +package Module::Install::MakeMaker; + +use strict; +use ExtUtils::MakeMaker (); +use Module::Install::Base (); + +use vars qw{$VERSION @ISA $ISCORE}; +BEGIN { + $VERSION = '1.19'; + @ISA = 'Module::Install::Base'; + $ISCORE = 1; +} + +my $makefile = undef; + +sub WriteMakefile { + my ($self, %args) = @_; + $makefile = $self->load('Makefile'); + + # mapping between MakeMaker and META.yml keys + $args{MODULE_NAME} = $args{NAME}; + unless ( $args{NAME} = $args{DISTNAME} or ! $args{MODULE_NAME} ) { + $args{NAME} = $args{MODULE_NAME}; + $args{NAME} =~ s/::/-/g; + } + + foreach my $key ( qw{name module_name version version_from abstract author installdirs} ) { + my $value = delete($args{uc($key)}) or next; + $self->$key($value); + } + + if (my $prereq = delete($args{PREREQ_PM})) { + while (my($k,$v) = each %$prereq) { + $self->requires($k,$v); + } + } + + if (my $prereq = delete($args{BUILD_REQUIRES})) { + while (my($k,$v) = each %$prereq) { + $self->build_requires($k,$v); + } + } + + # put the remaining args to makemaker_args + $self->makemaker_args(%args); +} + +END { + if ( $makefile ) { + $makefile->write; + $makefile->Meta->write; + } +} + +1; -- cgit v1.2.3