Mercurial > emacs
changeset 61342:2a3ffd4954e2
(change-log-font-lock-keywords): Complete 2005-04-03 change.
| author | Lute Kamstra <lute@gnu.org> |
|---|---|
| date | Wed, 06 Apr 2005 08:42:57 +0000 |
| parents | e45932e78d24 |
| children | fafed52b4946 |
| files | lisp/add-log.el |
| diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/add-log.el Wed Apr 06 02:37:08 2005 +0000 +++ b/lisp/add-log.el Wed Apr 06 08:42:57 2005 +0000 @@ -225,8 +225,8 @@ (2 'change-log-email-face))) ;; ;; File names. - ("^\\(?: +\\|\t\\)\\* \\([^ ,:([\n]+\\)" - (1 'change-log-file-face) + ("^\\( +\\|\t\\)\\* \\([^ ,:([\n]+\\)" + (2 'change-log-file-face) ;; Possibly further names in a list: ("\\=, \\([^ ,:([\n]+\\)" nil nil (1 'change-log-file-face)) ;; Possibly a parenthesized list of names: @@ -236,8 +236,8 @@ nil nil (1 'change-log-list-face))) ;; ;; Function or variable names. - ("^\t(\\([^(),\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)" - (1 'change-log-list-face) + ("^\\( +\\|\t\\)(\\([^(),\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)" + (2 'change-log-list-face) ("\\=, *\\([^(),\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)" nil nil (1 'change-log-list-face))) ;; @@ -250,8 +250,8 @@ ;; Acknowledgements. ;; Don't include plain "From" because that is vague; ;; we want to encourage people to say something more specific. - ("\\(^\t\\| \\)\\(Patch\\(es\\)? by\\|Report\\(ed by\\| from\\)\\|Suggest\\(ed by\\|ion from\\)\\)" - 2 'change-log-acknowledgement-face)) + ("\\(^\\( +\\|\t\\)\\| \\)\\(Patch\\(es\\)? by\\|Report\\(ed by\\| from\\)\\|Suggest\\(ed by\\|ion from\\)\\)" + 3 'change-log-acknowledgement-face)) "Additional expressions to highlight in Change Log mode.") (defvar change-log-mode-map