From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 11 Mar 2006 16:18:20 +0000 (+0000)
Subject: (rmail-summary-next-msg): Skip deleted messages, where "D" is the
X-Git-Tag: emacs-pretest-22.0.90~3676
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=710cb0d0553152ab4236b4f5c449b14d47d03fa5;p=emacs.git

(rmail-summary-next-msg): Skip deleted messages, where "D" is the
6th character.
---

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 539a1769386..c029e6e2268 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -535,7 +535,7 @@ messages, or backward if NUMBER is negative."
 	(search (if (> number 0) 're-search-forward 're-search-backward))
 	(non-del-msg-found nil))
     (while (and (> count 0) (setq non-del-msg-found
-				  (or (funcall search "^....[^D]" nil t)
+				  (or (funcall search "^.....[^D]" nil t)
 				      non-del-msg-found)))
       (setq count (1- count))))
   (beginning-of-line)