Synch to No Gnus 200504221124.

[elisp/gnus.git-] / lisp / nnmbox.el

diff --git a/lisp/nnmbox.el b/lisp/nnmbox.el
index efa5e5a..de520b3 100644 (file)
--- a/lisp/nnmbox.el
+++ b/lisp/nnmbox.el
@@ -190,9 +190,8 @@
                       (car active) (cdr active) group)))))
 
 (defun nnmbox-save-buffer ()
-  (let* ((coding-system-for-write (or nnmbox-file-coding-system-for-write
-                                     nnmbox-file-coding-system))
-        (output-coding-system coding-system-for-write))
+  (let ((coding-system-for-write (or nnmbox-file-coding-system-for-write
+                                    nnmbox-file-coding-system)))
     (save-buffer)))
 
 (defun nnmbox-save-active (group-alist active-file)
@@ -286,7 +285,7 @@
       (nconc rest articles))))
 
 (deffoo nnmbox-request-move-article
-    (article group server accept-form &optional last)
+    (article group server accept-form &optional last move-is-internal)
   (let ((buf (get-buffer-create " *nnmbox move*"))
        result)
     (and