*** empty log message ***

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 94adb25a870..3147022d695 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1158,9 +1158,9 @@ and reverse search is specified by a negative numeric arg."
     (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))))