[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 8c7f92f25c3: Fix total count of messages in Rmail summary buffers
From: |
Eli Zaretskii |
Subject: |
master 8c7f92f25c3: Fix total count of messages in Rmail summary buffers |
Date: |
Sat, 1 Jul 2023 04:34:46 -0400 (EDT) |
branch: master
commit 8c7f92f25c39137b5ddc2872597434fd5a3b38e9
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>
Fix total count of messages in Rmail summary buffers
* lisp/mail/rmailsum.el (rmail-new-summary-1): Actually count the
messages in the summary buffer instead of relying on
'rmail-total-messages'. Reported by Andrea Monaco
<andrea.monaco@autistici.org>.
---
lisp/mail/rmailsum.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 21dec2bbeb7..e3a6c16933b 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -742,13 +742,14 @@ message."
(setq rmail-summary-buffer nil)))
(save-excursion
(let ((rbuf (current-buffer))
- (total rmail-total-messages))
+ (total 0))
(set-buffer sumbuf)
;; Set up the summary buffer's contents.
(let ((buffer-read-only nil))
(erase-buffer)
(while summary-msgs
(princ (cdr (car summary-msgs)) sumbuf)
+ (setq total (1+ total))
(setq summary-msgs (cdr summary-msgs)))
(goto-char (point-min)))
;; Set up the rest of its state and local variables.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 8c7f92f25c3: Fix total count of messages in Rmail summary buffers,
Eli Zaretskii <=