summaryrefslogtreecommitdiff
path: root/Debian
diff options
context:
space:
mode:
authorModestas Vainius <modestas@vainius.eu>2009-06-12 20:18:45 +0300
committerModestas Vainius <modestas@vainius.eu>2009-06-13 17:03:26 +0300
commit9be81947e83e65726f2f34311276a153b5178a18 (patch)
tree774b49ebca5a88bf127026430cd0e96679ae6c44 /Debian
parent3c686f9757f640be742bf1ed4414f2b48c3d88d9 (diff)
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 <modestas@vainius.eu>
Diffstat (limited to 'Debian')
-rw-r--r--Debian/Debhelper/Buildsystem.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Debian/Debhelper/Buildsystem.pm b/Debian/Debhelper/Buildsystem.pm
index babbd10..68cb7f5 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),