From: Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
Date: Tue, 22 Jul 2008 05:38:31 +0000 (+0200)
Subject: tests: again, do not change the mode of all directories below $HOME
X-Git-Tag: v7.0~125
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1ee81530c09644492d5926b17174140c0a08ad22;p=thirdparty%2Fcoreutils.git

tests: again, do not change the mode of all directories below $HOME

* tests/CuTmpdir.pm (chmod_tree): Do not run chmod on undefined
argument, can happen when the build path contains spaces.
---

diff --git a/tests/CuTmpdir.pm b/tests/CuTmpdir.pm
index a7dd8b6a80..166e50bd83 100644
--- a/tests/CuTmpdir.pm
+++ b/tests/CuTmpdir.pm
@@ -45,7 +45,7 @@ sub chmod_1
 
 sub chmod_tree
 {
-  if (chdir $dir)
+  if (defined $dir && chdir $dir)
     {
       # Perform the equivalent of find . -type d -print0|xargs -0 chmod -R 700.
       my $options = {untaint => 1, wanted => \&chmod_1};