Mercurial > emacs
changeset 53403:9bdc3d1a6a5f
(backup-buffer-copy): If MODES is nil, don't set modes.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 29 Dec 2003 19:14:03 +0000 |
| parents | 7e645ea92195 |
| children | 5e98e2525d62 |
| files | lisp/files.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Mon Dec 29 19:13:28 2003 +0000 +++ b/lisp/files.el Mon Dec 29 19:14:03 2003 +0000 @@ -2552,7 +2552,8 @@ (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.