From 9be81947e83e65726f2f34311276a153b5178a18 Mon Sep 17 00:00:00 2001 From: Modestas Vainius Date: Fri, 12 Jun 2009 20:18:45 +0300 Subject: Use another root directory in _rel2rel. Previous one caused test "_rel2rel no4" to fail. Also add a new test for _canonpath and two new tests for _rel2rel (related to "." handling). Signed-off-by: Modestas Vainius --- Debian/Debhelper/Buildsystem.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Debian/Debhelper/Buildsystem.pm') diff --git a/Debian/Debhelper/Buildsystem.pm b/Debian/Debhelper/Buildsystem.pm index babbd10d..68cb7f5c 100644 --- a/Debian/Debhelper/Buildsystem.pm +++ b/Debian/Debhelper/Buildsystem.pm @@ -159,7 +159,7 @@ sub _canonpath { # converts and returns path of $path being relative the $base. sub _rel2rel { my ($this, $path, $base, $root)=@_; - $root = File::Spec->rootdir() if !defined $root; + $root = "/tmp" if !defined $root; return File::Spec->abs2rel( File::Spec->rel2abs($path, $root), -- cgit v1.2.3