From f72b0db0446788a867c5115845b28371ab5f0e9b Mon Sep 17 00:00:00 2001 From: Modestas Vainius Date: Tue, 9 Jun 2009 14:24:04 +0300 Subject: Implement source directory switching support (Closes: #530597). * New optional option --sourcedirectory/-d. * New Buildsystem API methods for getting source directory/path (since sourcedir may no longer be topdir), source 2 build directory convertions, doit_in_sourcedir() etc. * clean_builddir() -> rmdir_builddir() rename. --- Debian/Debhelper/Buildsystem/perl_build.pm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'Debian/Debhelper/Buildsystem/perl_build.pm') diff --git a/Debian/Debhelper/Buildsystem/perl_build.pm b/Debian/Debhelper/Buildsystem/perl_build.pm index 929d9e90..525b0e1c 100644 --- a/Debian/Debhelper/Buildsystem/perl_build.pm +++ b/Debian/Debhelper/Buildsystem/perl_build.pm @@ -7,7 +7,6 @@ package Debian::Debhelper::Buildsystem::perl_build; use strict; -use Debian::Debhelper::Dh_Lib; use base 'Debian::Debhelper::Buildsystem'; sub DESCRIPTION { @@ -18,9 +17,9 @@ sub check_auto_buildable { my ($this, $step) = @_; # Handles everything - my $ret = -e "Build.PL"; + my $ret = -e $this->get_sourcepath("Build.PL"); if ($step ne "configure") { - $ret &&= -e "Build"; + $ret &&= -e $this->get_sourcepath("Build"); } return $ret; } @@ -28,7 +27,7 @@ sub check_auto_buildable { sub do_perl { my $this=shift; $ENV{MODULEBUILDRC} = "/dev/null"; - doit("perl", @_); + $this->doit_in_sourcedir("perl", @_); } sub new { -- cgit v1.2.3