From 4ff53720257ea847cbaa221e86e0956063d0b547 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 23 Jun 2000 07:13:30 +0000 Subject: [PATCH] (basic-save-buffer-2): When temporarily setting file modes, set them to current modes plus 0200, not to 0777. --- lisp/files.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/files.el b/lisp/files.el index 5015964928f..570a31b808c 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2676,7 +2676,7 @@ After saving the buffer, this function runs `after-save-hook'." (cond ((and tempsetmodes (not setmodes)) ;; Change the mode back, after writing. (setq setmodes (file-modes buffer-file-name)) - (set-file-modes buffer-file-name 511))) + (set-file-modes buffer-file-name (logior setmodes 128)))) (write-region (point-min) (point-max) buffer-file-name nil t buffer-file-truename))) setmodes)) -- 2.39.2