projects
/
elisp
/
apel.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
37e12c3
)
(make-temp-file): Don't use octal number for file modes.
author
shuhei
<shuhei>
Thu, 3 Jul 2003 12:53:24 +0000
(12:53 +0000)
committer
shuhei
<shuhei>
Thu, 3 Jul 2003 12:53:24 +0000
(12:53 +0000)
ChangeLog
patch
|
blob
|
history
poe.el
patch
|
blob
|
history
diff --git
a/ChangeLog
b/ChangeLog
index
3a7f2b8
..
57cf325
100644
(file)
--- 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]:
* 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.
* 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
(file)
--- 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.
;; 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
(while (condition-case ()
(progn
(setq file