(basic-save-buffer-2): For a new precious file,

use the default modes in the return value.

diff --git a/lisp/files.el b/lisp/files.el
index 91f857dd2ec107e01e5813606aeb62b2c78d0cf5..3313f003d89e099c8606fbca4b0cd26e302e86ec 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3630,8 +3630,9 @@ Before and after saving the buffer, this function runs
                (set-visited-file-modtime old-modtime)))
            ;; Since we have created an entirely new file,
            ;; make sure it gets the right permission bits set.
-           (setq setmodes (or setmodes (cons (file-modes buffer-file-name)
-                                             buffer-file-name)))
+           (setq setmodes (or setmodes
+                              (cons (or (file-modes buffer-file-name) umask)
+                                    buffer-file-name)))
            ;; We succeeded in writing the temp file,
            ;; so rename it.
            (rename-file tempname buffer-file-name t))