From: Erik Naggum <erik@naggum.no>
Date: Wed, 3 Apr 1996 18:22:06 +0000 (+0000)
Subject: (gnus-summary-prepare-threads): Call `gnus-message' instead of `message'.
X-Git-Tag: emacs-19.34~928
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=13589948b500bcbc4a5d77008ccbaa648b9bb22f;p=emacs.git

(gnus-summary-prepare-threads): Call `gnus-message' instead of `message'.
---

diff --git a/lisp/gnus.el b/lisp/gnus.el
index a2c2f445ff0..c72e407c2e7 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -6502,7 +6502,7 @@ Unscored articles will be counted as having a score of zero."
   "Prepare summary buffer from THREADS and indentation LEVEL.  
 THREADS is either a list of `(PARENT [(CHILD1 [(GRANDCHILD ...]...) ...])'  
 or a straight list of headers."
-  (message "Generating summary...")
+  (gnus-message 5 "Generating summary...")
   (let ((level 0)
 	thread header number subject stack state gnus-tmp-gathered)
     (if (vectorp (car threads))
@@ -6628,7 +6628,7 @@ or a straight list of headers."
 	    (setq stack (cons (cons (max 0 level) (nthcdr 1 thread)) stack)))
 	(setq level (1+ level))
 	(setq threads (cdr (car thread))))))
-  (message "Generating summary...done"))
+  (gnus-message 5 "Generating summary...done"))