X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debian%2FDebhelper%2FBuildsystem%2Fperl_build.pm;h=35a23d675b12bd620855206d38ee9eb768ad727a;hb=798e7eb1659e8a1fab0e171a8f77d097f0d18694;hp=3567cb1a7386c56818e313555d75f96473609bfb;hpb=95f0a0968c30a6737c3f321f305985b3fd33a63e;p=debhelper.git

diff --git a/Debian/Debhelper/Buildsystem/perl_build.pm b/Debian/Debhelper/Buildsystem/perl_build.pm
index 3567cb1..35a23d6 100644
--- a/Debian/Debhelper/Buildsystem/perl_build.pm
+++ b/Debian/Debhelper/Buildsystem/perl_build.pm
@@ -7,7 +7,9 @@
 package Debian::Debhelper::Buildsystem::perl_build;
 
 use strict;
+use Debian::Debhelper::Dh_Lib qw(compat);
 use base 'Debian::Debhelper::Buildsystem';
+use Config;
 
 sub DESCRIPTION {
 	"Perl Module::Build (Build.PL)"
@@ -21,12 +23,11 @@ sub check_auto_buildable {
 	if ($step ne "configure") {
 		$ret &&= -e $this->get_sourcepath("Build");
 	}
-	return $ret;
+	return $ret ? 1 : 0;
 }
 
 sub do_perl {
 	my $this=shift;
-	$ENV{MODULEBUILDRC} = "/dev/null";
 	$this->doit_in_sourcedir("perl", @_);
 }
 
@@ -39,8 +40,15 @@ sub new {
 
 sub configure {
 	my $this=shift;
+	my @flags;
 	$ENV{PERL_MM_USE_DEFAULT}=1;
-	$this->do_perl("Build.PL", "installdirs=vendor", @_);
+	if ($ENV{CFLAGS} && ! compat(8)) {
+		push @flags, "config=optimize=$ENV{CFLAGS} $ENV{CPPFLAGS}";
+	}
+	if ($ENV{LDFLAGS} && ! compat(8)) {
+		push @flags, "config=ld=$Config{ld} $ENV{LDFLAGS}";
+	}
+	$this->do_perl("Build.PL", "installdirs=vendor", @flags, @_);
 }
 
 sub build {
@@ -61,7 +69,9 @@ sub install {
 
 sub clean {
 	my $this=shift;
-	$this->do_perl("Build", "--allow_mb_mismatch", 1, "distclean", @_);
+	if (-e $this->get_sourcepath("Build")) {
+		$this->do_perl("Build", "--allow_mb_mismatch", 1, "distclean", @_);
+	}
 }
 
-1;
+1