From 080525ae584f1191201d0b8bc5266b3b07019f00 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Thu, 23 Jun 2005 00:42:02 +0000 Subject: [PATCH] (change-log-font-lock-keywords): Make the regexp for date lines stricter. --- lisp/add-log.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/lisp/add-log.el b/lisp/add-log.el index bde75db8ec..03f4497676 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -232,9 +232,13 @@ Note: The search is conducted only within 10%, at the beginning of the file." (defvar change-log-font-lock-keywords '(;; - ;; Date lines, new and old styles. - ("^\\sw.........[0-9:+ ]*" - (0 'change-log-date) + ;; Date lines, new (2000-01-01) and old (Sat Jan 1 00:00:00 2000) styles. + ;; Fixme: this regepx is just an approximate one and may match + ;; wrongly with a non-date line existing as a random note. In + ;; addition, using any kind of fixed setting like this doesn't + ;; work if a user customizes add-log-time-format. + ("^[0-9-]+ +\\|^\\(Sun\\|Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\) [A-z][a-z][a-z] [0-9:+ ]+" + (0 'change-log-date-face) ;; Name and e-mail; some people put e-mail in parens, not angles. ("\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)[>)]" nil nil (1 'change-log-name) -- 2.20.1