summaryrefslogtreecommitdiff
path: root/lisp/gnus/nnmbox.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2020-02-26 17:10:21 -0800
committerPaul Eggert <eggert@cs.ucla.edu>2020-02-26 17:10:48 -0800
commit07da629926daf849aab248175c88cf53a5e21558 (patch)
treea2d84bbae86d34d0ee4c9d9e535ff5aef2aee5bc /lisp/gnus/nnmbox.el
parent3766bf728a43933083f4525970bcf9fdace3838d (diff)
downloademacs-07da629926daf849aab248175c88cf53a5e21558.tar.gz
emacs-07da629926daf849aab248175c88cf53a5e21558.tar.bz2
emacs-07da629926daf849aab248175c88cf53a5e21558.zip
nnmail-cache-close should not use nofollow
nnmail-cache-close did not work when ~/.nnmail-cache was a symlink to some other directory. Reported by Michael Albinus (Bug#39793). * lisp/gnus/nnbabyl.el (nnbabyl-create-mbox): * lisp/gnus/nndiary.el (nndiary-generate-nov-file): * lisp/gnus/nnfolder.el (nnfolder-possibly-change-group): * lisp/gnus/nnmbox.el (nnmbox-create-mbox): * lisp/gnus/nnml.el (nnml-generate-nov-file): Pass ‘excl’ to nnmail-write-region when creating a file, for safety. * lisp/gnus/nnmail.el (nnmail-write-region): Add optional MUSTBENEW arg, to stay consistent with write-region. Past ‘nofollow’ to set-file-modes only when MUSTBENEW is ‘excl’.
Diffstat (limited to 'lisp/gnus/nnmbox.el')
-rw-r--r--lisp/gnus/nnmbox.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/nnmbox.el b/lisp/gnus/nnmbox.el
index a191f887c78..8b3d80266e7 100644
--- a/lisp/gnus/nnmbox.el
+++ b/lisp/gnus/nnmbox.el
@@ -613,7 +613,7 @@
(dir (file-name-directory nnmbox-mbox-file)))
(and dir (gnus-make-directory dir))
(nnmail-write-region (point-min) (point-min)
- nnmbox-mbox-file t 'nomesg))))
+ nnmbox-mbox-file t 'nomesg nil 'excl))))
(defun nnmbox-read-mbox ()
(nnmail-activate 'nnmbox)