1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(basic-save-buffer-2): When temporarily setting

file modes, set them to current modes plus 0200, not to 0777.
This commit is contained in:
Gerd Moellmann 2000-06-23 07:13:30 +00:00
parent 9858013fc8
commit 4ff5372025

View file

@ -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))