mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 18:40:39 -08:00
Code Issues Projects Releases Wiki Activity

(rmail-first-unseen-message): Fix 1-off error.

Browse source
This commit is contained in:
Richard M. Stallman 1994-12-20 15:42:57 +00:00
parent e8c04c88ef
commit bb9dcce1b1
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/mail/rmail.el
View file

@ -1734,7 +1734,7 @@ Interactively, empty argument means use same regexp used last time."
found)
(save-restriction
(widen)
(while (and (not found) (< current rmail-total-messages))
(while (and (not found) (<= current rmail-total-messages))
(if (rmail-message-labels-p current ", ?\\(unseen\\),")
(setq found current))
(setq current (1+ current))))