(unrmail): Don't make or switch to a summary buffer.

diff --git a/lisp/mail/unrmail.el b/lisp/mail/unrmail.el
index d203f54..46c4b3d 100644 (file)
--- a/lisp/mail/unrmail.el
+++ b/lisp/mail/unrmail.el
@@ -48,6 +48,8 @@ For example, invoke `emacs -batch -f batch-unrmail RMAIL'."
   "Convert Rmail file FILE to system inbox format file TO-FILE."
   (interactive "fUnrmail (rmail file): \nFUnrmail into (new mailbox file): ")
   (let ((message-count 0)
+       ;; Prevent rmail from making, or switching to, a summary buffer.
+       (rmail-display-summary nil)
        (rmail-delete-after-output nil))
     (rmail file)
     (message "Writing messages to %s..." to-file)