From 13589948b500bcbc4a5d77008ccbaa648b9bb22f Mon Sep 17 00:00:00 2001 From: Erik Naggum Date: Wed, 3 Apr 1996 18:22:06 +0000 Subject: [PATCH] (gnus-summary-prepare-threads): Call `gnus-message' instead of `message'. --- lisp/gnus.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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")) -- 2.39.2