X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fnnmbox.el;h=5f6ecd103da9a77813fee20b1aee7a383472fb21;hb=11dce356dee90fe9e71c190f459e18ff939c71af;hp=1793852c271307bf4e1e6c032eda7ebc92afae0a;hpb=a2d6af2c24264119c5aff0ef0063733674eef102;p=elisp%2Fgnus.git-

diff --git a/lisp/nnmbox.el b/lisp/nnmbox.el
index 1793852..5f6ecd1 100644
--- a/lisp/nnmbox.el
+++ b/lisp/nnmbox.el
@@ -519,7 +519,8 @@
 (defun nnmbox-create-mbox ()
   (when (not (file-exists-p nnmbox-mbox-file))
     (let ((nnmail-file-coding-system
-	   nnmbox-file-coding-system-for-write))
+	   (or nnmbox-file-coding-system-for-write
+	       nnmbox-file-coding-system)))
       (nnmail-write-region 1 1 nnmbox-mbox-file t 'nomesg))))
 
 (defun nnmbox-read-mbox ()