Mercurial > emacs
comparison lisp/vc-git.el @ 78820:25e6b97b8f02
(vc-git-log-view-mode): Add font-lock patterns for
Signed-off-by, Acked-by and Merge.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Mon, 17 Sep 2007 19:13:19 +0000 |
| parents | 429a17d4958d |
| children | 5f49af3d292b 5039706521c9 |
comparison
equal
deleted
inserted
replaced
| 78819:9390b3d333bb | 78820:25e6b97b8f02 |
|---|---|
| 288 ;; Handle the case: | 288 ;; Handle the case: |
| 289 ;; user: FirstName LastName <foo@bar> | 289 ;; user: FirstName LastName <foo@bar> |
| 290 ("^Author:[ \t]+\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)[>)]" | 290 ("^Author:[ \t]+\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)[>)]" |
| 291 (1 'change-log-name) | 291 (1 'change-log-name) |
| 292 (2 'change-log-email)) | 292 (2 'change-log-email)) |
| 293 ("^ +\\(?:\\(?:[Aa]cked\\|[Ss]igned-[Oo]ff\\)-[Bb]y:\\)[ \t]+\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)" | |
| 294 (1 'change-log-name)) | |
| 295 ("^ +\\(?:\\(?:[Aa]cked\\|[Ss]igned-[Oo]ff\\)-[Bb]y:\\)[ \t]+\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)[>)]" | |
| 296 (1 'change-log-name) | |
| 297 (2 'change-log-email)) | |
| 298 ("^Merge: \\([0-9a-z]+\\) \\([0-9a-z]+\\)" | |
| 299 (1 'change-log-acknowledgement) | |
| 300 (2 'change-log-acknowledgement)) | |
| 293 ("^Date: \\(.+\\)" (1 'change-log-date)) | 301 ("^Date: \\(.+\\)" (1 'change-log-date)) |
| 294 ("^summary:[ \t]+\\(.+\\)" (1 'log-view-message)))))) | 302 ("^summary:[ \t]+\\(.+\\)" (1 'log-view-message)))))) |
| 295 | 303 |
| 296 (defun vc-git-diff (files &optional rev1 rev2 buffer) | 304 (defun vc-git-diff (files &optional rev1 rev2 buffer) |
| 297 (let ((buf (or buffer "*vc-diff*"))) | 305 (let ((buf (or buffer "*vc-diff*"))) |