From 5f9afbd67399ba0ee6954b738f2d2b310150d69b Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 27 Sep 1994 05:37:06 +0000 Subject: (rmail-summary-delete-forward): Regexp for recognizing deleted message should not require a space at the beginning of the line. --- lisp/mail/rmailsum.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/mail/rmailsum.el') diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index 67a4f72c02a..2f7a8d4b47e 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el @@ -431,7 +431,7 @@ With prefix argument, delete and move backward." (rmail-summary-mark-deleted del-msg) (while (and (not (if backward (bobp) (eobp))) (save-excursion (beginning-of-line) - (looking-at " +[0-9]+D"))) + (looking-at " *[0-9]+D"))) (forward-line (if backward -1 1)))))) (defun rmail-summary-delete-backward () -- cgit v1.2.1