[dh-make-perl] 01/01: t/*.t: use dh-make-perl without path instead of $Bin/../dh-make-perl if $ADTTMP is set

Axel Beckert abe at deuxchevaux.org
Sun Sep 14 12:51:36 UTC 2014


This is an automated email from the git hooks/post-receive script.

abe pushed a commit to branch master
in repository dh-make-perl.

commit 5b04a66c7227213350a39e42c360942667a3c7c8
Author: Axel Beckert <abe at deuxchevaux.org>
Date:   Sun Sep 14 14:51:30 2014 +0200

    t/*.t: use dh-make-perl without path instead of $Bin/../dh-make-perl if $ADTTMP is set
---
 t/cache.t | 3 ++-
 t/dists.t | 3 ++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/t/cache.t b/t/cache.t
index 9ab3bcb..d662260 100755
--- a/t/cache.t
+++ b/t/cache.t
@@ -24,7 +24,8 @@ sub dist_ok($) {
         or die "unlink($Bin/contents/wnpp.cache): $!" );
     system('touch', "$Bin/contents/wnpp.cache");
 
-    system( "$Bin/../dh-make-perl", "--no-verbose",
+    system( $ENV{ADTTMP} ? 'dh-make-perl' : "$Bin/../dh-make-perl",
+            "--no-verbose",
             "--home-dir", "$Bin/contents",
             "--apt-contents-dir", "$Bin/contents",
             "--data-dir", "$Bin/../share",
diff --git a/t/dists.t b/t/dists.t
index dabc6f3..c4f9061 100755
--- a/t/dists.t
+++ b/t/dists.t
@@ -126,7 +126,8 @@ sub dist_ok($) {
 
     run_and_compare {
         run => [
-            "$Bin/../dh-make-perl", "--no-verbose",
+            $ENV{ADTTMP} ? 'dh-make-perl' : "$Bin/../dh-make-perl",
+            "--no-verbose",
             "--home-dir",           "$Bin/contents",
             "--apt-contents-dir",   "$Bin/contents",
             "--data-dir",           "$Bin/../share",

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/dh-make-perl.git



More information about the Pkg-perl-cvs-commits mailing list