From d3c2b0220dd88e6ab43ae68e2bf73a241754dffc Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 24 Aug 2007 07:11:54 +0000 Subject: [PATCH] (backup-buffer-copy): Fully revert change. Sigh. --- lisp/files.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 84aa78b4a5..69ebf46078 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -3120,9 +3120,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 -- 2.39.2