mocksetup: /unsafe+/hdd -> /quad

[nethome.git] / bin / cvsutil

diff --git a/bin/cvsutil b/bin/cvsutil
index 18cdce1..72c19d5 100755 (executable)
--- a/bin/cvsutil
+++ b/bin/cvsutil
@@ -222,7 +222,8 @@ sub localactionrm
 {
 my($filename)=@_;
 
-       chmod 0700,$filename or do {
+       # &chmod follows the symlinks.
+       -l $filename or chmod 0700,$filename or do {
                mayfatal "File \"$_\" cannot be chmod(2)ed" if !$!{ENOENT};
                };
        # '\1' for '-r':