From: Gerd Moellmann Date: Tue, 19 Sep 2000 14:55:58 +0000 (+0000) Subject: (change-log-font-lock-keywords): Match names X-Git-Tag: emacs-pretest-21.0.90~1523 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8f4ca9a5e45f8ac3e52d23e3ef1fdcc0d084a7fa;p=emacs.git (change-log-font-lock-keywords): Match names more exactly for the case that font-lock-constant-face is underlined. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e4eac89b166..5598ff181f3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2000-09-19 Gerd Moellmann + + * add-log.el (change-log-font-lock-keywords): Match names + more exactly for the case that font-lock-constant-face is + underlined. + 2000-09-19 Andre Spiegel * vc.el (vc-revert-buffer): Set vc-checkout-time correctly. @@ -15,7 +21,7 @@ * gnus/nnultimate.el, gnus/nnwarchive.el, gnus/qp.el, * gnus/rfc1843.el, gnus/rfc2045.el, gnus/rfc2047.el, * gnus/rfc2104.el, gnus/rfc2231.el, gnus/time-date.el, - * gnus/utf7.el, gnsu/uudecode.el, gnus/webmail.el: New files. + * gnus/utf7.el, gnus/uudecode.el, gnus/webmail.el: New files. * startup.el (fancy-splash-text): New variable. (fancy-splash-delay, fancy-splash-image): New user-options. diff --git a/lisp/add-log.el b/lisp/add-log.el index f2b93b8c047..0d253614945 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -152,7 +152,7 @@ Note: The search is conducted only within 10%, at the beginning of the file." ("^\\sw.........[0-9:+ ]*" (0 font-lock-string-face) ;; Name and e-mail; some people put e-mail in parens, not angles. - ("\\([^<(]+\\)[(<]\\([A-Za-z0-9_.-]+@[A-Za-z0-9_.-]+\\)[>)]" nil nil + ("\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.-]+@[A-Za-z0-9_.-]+\\)[>)]" nil nil (1 font-lock-constant-face) (2 font-lock-variable-name-face))) ;;