1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-03 08:30:09 +00:00

(backup-buffer-copy): Fully revert change. Sigh.

This commit is contained in:
Glenn Morris 2007-08-24 07:10:53 +00:00
parent a19ab870d7
commit a2a32f6f06

View File

@ -3172,9 +3172,7 @@ BACKUPNAME is the backup file name, which is the old file renamed."
(file-error nil))))))
(defun backup-buffer-copy (from-name to-name modes)
(let ((umask (default-file-modes))
(dir (or (file-name-directory to-name)
default-directory)))
(let ((umask (default-file-modes)))
(unwind-protect
(progn
;; Create temp files with strict access rights. It's easy to