From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 16 Jan 2021 18:18:32 +0000 (+0200)
Subject: Fix Rmail summary for more than 99,999 messages
X-Git-Tag: emacs-28.0.90~4249
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=66756df286bea6efd3f9a8290e38e8d77bdf0264;p=emacs.git

Fix Rmail summary for more than 99,999 messages

* lisp/mail/rmailsum.el (rmail-summary-font-lock-keywords): Don't
assume there will be less than 100,000 messages in an mbox file.
(Bug#45912)
---

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 60b67edf85a..d29115a9570 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -51,10 +51,10 @@ Setting this option to nil might speed up the generation of summaries."
   :group 'rmail-summary)
 
 (defvar rmail-summary-font-lock-keywords
-  '(("^.....D.*" . font-lock-string-face)			; Deleted.
-    ("^.....-.*" . font-lock-type-face)				; Unread.
+  '(("^ *[0-9]+D.*" . font-lock-string-face)			; Deleted.
+    ("^ *[0-9]+-.*" . font-lock-type-face)			; Unread.
     ;; Neither of the below will be highlighted if either of the above are:
-    ("^.....[^D-] \\(......\\)" 1 font-lock-keyword-face)	; Date.
+    ("^ *[0-9]+[^D-] \\(......\\)" 1 font-lock-keyword-face)	; Date.
     ("{ \\([^\n}]+\\) }" 1 font-lock-comment-face))		; Labels.
   "Additional expressions to highlight in Rmail Summary mode.")