# HG changeset patch # User Eli Zaretskii # Date 1142093900 0 # Node ID ecd9a20a44b0b4c468dd79e37405d7e410f4c6e5 # Parent 2413e06fae9c067db0f596947d22ae940acceb7b (rmail-summary-next-msg): Skip deleted messages, where "D" is the 6th character. diff -r 2413e06fae9c -r ecd9a20a44b0 lisp/mail/rmailsum.el --- a/lisp/mail/rmailsum.el Sat Mar 11 16:03:03 2006 +0000 +++ b/lisp/mail/rmailsum.el Sat Mar 11 16:18:20 2006 +0000 @@ -535,7 +535,7 @@ (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)