changeset 346:52cd078baf00

*** empty log message ***
author Roland McGrath <roland@gnu.org>
date Tue, 23 Jul 1991 20:23:44 +0000
parents 8633e6928acc
children 6506740942fa
files lisp/mail/rmail.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Tue Jul 23 20:13:12 1991 +0000
+++ b/lisp/mail/rmail.el	Tue Jul 23 20:23:44 1991 +0000
@@ -1158,9 +1158,9 @@
     (save-restriction
       (widen)
       (while (and (not found) (< current rmail-total-messages))
-	(setq current (1+ current))
 	(if (rmail-message-labels-p current ", ?\\(unseen\\),")
-	    (setq found current))))
+	    (setq found current))
+	(setq current (1+ current))))
     (if found
 	(rmail-show-message found))))