From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 16 Jun 2006 15:14:40 +0000 (+0000)
Subject: (basic-save-buffer-2): For a new precious file,
X-Git-Tag: emacs-pretest-22.0.90~1936
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=730df8dbd56435eaf68d4ba29504a31e746c6ce3;p=emacs.git

(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 91f857dd2ec..3313f003d89 100644
--- 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))