From: shuhei <shuhei>
Date: Thu, 3 Jul 2003 12:53:24 +0000 (+0000)
Subject: (make-temp-file): Don't use octal number for file modes.
X-Git-Tag: apel-10_6~1
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6a1aa0cd36b1b3254c9a1ac95e8ccb44e48b9815;p=elisp%2Fapel.git

(make-temp-file): Don't use octal number for file modes.
---

diff --git a/ChangeLog b/ChangeLog
index 3a7f2b8..57cf325 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,9 +1,14 @@
-2003-07-03  Yuuichi Teranishi  <teranisi@gohome.org>
+2003-07-03  Shuhei KOBAYASHI  <shuhei@aqua.ocn.ne.jp>
+
+	* poe.el (make-temp-file) [2-args make-temp-file]:
+	Don't use octal number for file modes.
 
 	* poe.el (toplevel): Fixed the compile-time check for the definition of
 	`make-temp-file' [apel-ja: 00874].
 	(make-temp-file) [no make-temp-file, single-user system]:
-	Don't use set-default-file-modes nor default-file-modes.
+	Don't use `set-default-file-modes' nor `default-file-modes'.
+
+2003-07-03  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* poe-18.el (make-directory-internal): Signal an error according to
 	the exit status of mkdir.
diff --git a/poe.el b/poe.el
index c66a5bb..3ad2699 100644
--- a/poe.el
+++ b/poe.el
@@ -1660,7 +1660,7 @@ If SUFFIX is non-nil, add that at the end of the file name."
             ;; Create temp files with strict access rights.  
             ;; It's easy toloosen them later, whereas it's impossible
             ;;  to close the time-window of loose permissions otherwise.
-            (set-default-file-modes ?\700)
+            (set-default-file-modes 448)
             (while (condition-case ()
                        (progn
                          (setq file