(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 (file)
--- 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)))))