Mercurial > emacs
comparison lisp/add-log.el @ 62877:b03135d4ca2a
(change-log-font-lock-keywords):
Add `+' to e-mail regexp to accept mail address with keywords.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Sun, 29 May 2005 16:09:04 +0000 |
parents | 2c228409c44d |
children | d4857c25a45b 01137c1fdbe9 |
comparison
equal
deleted
inserted
replaced
62876:91cd19004788 | 62877:b03135d4ca2a |
---|---|
218 '(;; | 218 '(;; |
219 ;; Date lines, new and old styles. | 219 ;; Date lines, new and old styles. |
220 ("^\\sw.........[0-9:+ ]*" | 220 ("^\\sw.........[0-9:+ ]*" |
221 (0 'change-log-date-face) | 221 (0 'change-log-date-face) |
222 ;; Name and e-mail; some people put e-mail in parens, not angles. | 222 ;; Name and e-mail; some people put e-mail in parens, not angles. |
223 ("\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.-]+@[A-Za-z0-9_.-]+\\)[>)]" nil nil | 223 ("\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)[>)]" nil nil |
224 (1 'change-log-name-face) | 224 (1 'change-log-name-face) |
225 (2 'change-log-email-face))) | 225 (2 'change-log-email-face))) |
226 ;; | 226 ;; |
227 ;; File names. | 227 ;; File names. |
228 ("^\\( +\\|\t\\)\\* \\([^ ,:([\n]+\\)" | 228 ("^\\( +\\|\t\\)\\* \\([^ ,:([\n]+\\)" |