diff options
| author | Erik Naggum <erik@naggum.no> | 1996-04-03 18:22:06 +0000 |
|---|---|---|
| committer | Erik Naggum <erik@naggum.no> | 1996-04-03 18:22:06 +0000 |
| commit | 13589948b500bcbc4a5d77008ccbaa648b9bb22f (patch) | |
| tree | ae523f5affd7be5fd5a1a908e42085c7a272d254 /lisp/gnus.el | |
| parent | d69fa6b17902c182f3d5ce209453c805a86003ad (diff) | |
| download | emacs-13589948b500bcbc4a5d77008ccbaa648b9bb22f.tar.gz | |
(gnus-summary-prepare-threads): Call `gnus-message' instead of `message'.
Diffstat (limited to 'lisp/gnus.el')
| -rw-r--r-- | lisp/gnus.el | 4 |
1 files 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")) |