Don't output messages when saving.

diff --git a/lisp/pop3.el b/lisp/pop3.el
index 51c2f1a..3d992cc 100644 (file)
--- a/lisp/pop3.el
+++ b/lisp/pop3.el
@@ -197,7 +197,7 @@ Use streaming commands."
        ;; delete it.
        (when (eolp)
          (delete-char 1))
-       (write-region (point-min) (point-max) file)))))
+       (write-region (point-min) (point-max) file nil 'nomesg)))))
 
 (defun pop3-number-of-responses (endp)
   (let ((responses 0))