summaryrefslogtreecommitdiff
path: root/lisp/add-log.el
diff options
context:
space:
mode:
authorKaroly Lorentey <lorentey@elte.hu>2005-06-25 15:00:08 +0000
committerKaroly Lorentey <lorentey@elte.hu>2005-06-25 15:00:08 +0000
commit0d0358be7e741898e363d02dbff01b35c662413c (patch)
treee6bdb6ae792a8be712780a5cfad4eeddb09c4f43 /lisp/add-log.el
parentf4d9bf3a9be50a17c2e2f7569b88f3606ab273d9 (diff)
parentb93e3c3ba1644f5e746c7486bd609ba9fc7ec583 (diff)
downloademacs-0d0358be7e741898e363d02dbff01b35c662413c.tar.gz
emacs-0d0358be7e741898e363d02dbff01b35c662413c.tar.bz2
emacs-0d0358be7e741898e363d02dbff01b35c662413c.zip
Merged from miles@gnu.org--gnu-2005 (patch 441-446)
Patches applied: * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-441 Update reference to renamed Buffer-menu-buffer face * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-442 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-443 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-444 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-445 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-446 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-354
Diffstat (limited to 'lisp/add-log.el')
-rw-r--r--lisp/add-log.el10
1 files changed, 7 insertions, 3 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el
index bde75db8ec7..03f44976760 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)