Import Gnus v5.10.5.

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

diff --git a/lisp/gnus-fun.el b/lisp/gnus-fun.el
index ca5cdea..b293d4e 100644 (file)
--- a/lisp/gnus-fun.el
+++ b/lisp/gnus-fun.el
@@ -119,8 +119,8 @@ Output to the current buffer, replace text, and don't mingle error."
        (if (> (length attempt) 726)
            (progn
              (setq quant (- quant 2))
-             (message "Length %d; trying quant %d"
-                      (length attempt) quant))
+             (gnus-message 9 "Length %d; trying quant %d"
+                           (length attempt) quant))
          (setq done t)))
       (if done
          (mm-with-unibyte-buffer