From: yamaoka <yamaoka>
Date: Fri, 11 Jun 1999 12:19:06 +0000 (+0000)
Subject: (nnmail-save-active): Bind `output-coding-system' to the value of
X-Git-Tag: et-gnus-6_11_00-02~4
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8ddc8af181ba078095792a87be0cfa546d4358e8;p=elisp%2Fgnus.git-

(nnmail-save-active): Bind `output-coding-system' to the value of
`nnmail-active-file-coding-system'.
---

diff --git a/lisp/nnmail.el b/lisp/nnmail.el
index 6f0045f..24f4b03 100644
--- a/lisp/nnmail.el
+++ b/lisp/nnmail.el
@@ -486,7 +486,8 @@ nn*-request-list should have been called before calling this function."
 
 (defun nnmail-save-active (group-assoc file-name)
   "Save GROUP-ASSOC in ACTIVE-FILE."
-  (let ((coding-system-for-write nnmail-active-file-coding-system))
+  (let ((coding-system-for-write nnmail-active-file-coding-system)
+	(output-coding-system nnmail-active-file-coding-system))
     (when file-name
       (with-temp-file file-name
 	(nnmail-generate-active group-assoc)))))