Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-14 12:31:25 +00:00
Code Issues Projects Releases Packages Wiki Activity

The summary scan should include the current msg and run to end.

Browse source 
* lisp/mail/rmailsum.el (rmail-new-summary-1): If we are before,
or close to, msg number rmail-summary-starting-message,
start the search a little before there.
This commit is contained in:
Richard Stallman 2026-04-22 15:41:40 -04:00
parent ec7a5f85c9
commit 0fb9d096e3
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/mail/rmailsum.el
View file

@ -789,7 +789,11 @@ message."
(sumbuf (rmail-get-create-summary-buffer)))
;; Scan the messages, getting their summary strings
;; and putting the list of them in SUMMARY-MSGS.
(let ((msgnum rmail-summary-starting-message)
(let ((msgnum (min rmail-summary-starting-message
;; If we are before, or close to, msg number
;; rmail-summary-starting-message,
;; start the search a little before there.
(max 1 (floor (* .9 rmail-current-message)))))
(main-buffer (current-buffer))
(total rmail-total-messages)
(inhibit-read-only t))