From 147fbf703d1996d723523d849b402e792be0d066 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 29 Dec 2003 19:14:03 +0000 Subject: [PATCH] (backup-buffer-copy): If MODES is nil, don't set modes. --- lisp/files.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/files.el b/lisp/files.el index ce4d67d33e4..4983b1287e8 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2552,7 +2552,8 @@ BACKUPNAME is the backup file name, which is the old file renamed." (not (file-writable-p to-name))) (delete-file to-name)) (copy-file from-name to-name t t))) - (set-file-modes to-name (logand modes #o1777))) + (and modes + (set-file-modes to-name (logand modes #o1777)))) (defun file-name-sans-versions (name &optional keep-backup-version) "Return file NAME sans backup versions or strings. -- 2.39.2