mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

Replace change-log-date-face -> change-log-date

Browse Source 
This fixes c430f7e23f.
This commit is contained in:
Sam Steingold 2017-03-08 13:32:21 -05:00
parent a158b351e7
commit e4fff0ff2a
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/vc/add-log.el
View File

@ -240,7 +240,7 @@ a case simply use the directory containing the changed file."
;; addition, using any kind of fixed setting like this doesn't ;; addition, using any kind of fixed setting like this doesn't
;; work if a user customizes add-log-time-format. ;; work if a user customizes add-log-time-format.
("^[0-9-]+ +\\|^ \\{11,\\}\\|^\t \\{3,\\}\\|^\\(Sun\\|Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\) [A-z][a-z][a-z] [0-9:+ ]+" ("^[0-9-]+ +\\|^ \\{11,\\}\\|^\t \\{3,\\}\\|^\\(Sun\\|Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\) [A-z][a-z][a-z] [0-9:+ ]+"
(0 'change-log-date-face) (0 'change-log-date)
;; Name and e-mail; some people put e-mail in parens, not angles. ;; Name and e-mail; some people put e-mail in parens, not angles.
("\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)[>)]" nil nil ("\\([^<(]+?\\)[ \t]*[(<]\\([A-Za-z0-9_.+-]+@[A-Za-z0-9_.-]+\\)[>)]" nil nil
(1 'change-log-name) (1 'change-log-name)

2
lisp/vc/vc-bzr.el
View File

@ -725,7 +725,7 @@ or a superior directory.")
\\([^<(]+?\\)[ ]*[(<]\\([[:alnum:]_.+-]+@[[:alnum:]_.-]+\\)[>)]" \\([^<(]+?\\)[ ]*[(<]\\([[:alnum:]_.+-]+@[[:alnum:]_.-]+\\)[>)]"
(1 'change-log-name) (1 'change-log-name)
(2 'change-log-email)) (2 'change-log-email))
("^ *timestamp: \\(.*\\)" (1 'change-log-date-face))))))) ("^ *timestamp: \\(.*\\)" (1 'change-log-date)))))))
(autoload 'vc-setup-buffer "vc-dispatcher") (autoload 'vc-setup-buffer "vc-dispatcher")

2
lisp/vc/vc-mtn.el
View File

@ -250,7 +250,7 @@ If LIMIT is non-nil, show no more than this many entries."
(set (make-local-variable 'log-view-font-lock-keywords) (set (make-local-variable 'log-view-font-lock-keywords)
(append log-view-font-lock-keywords (append log-view-font-lock-keywords
'(("^[ |]+Author: \\(.*\\)" (1 'change-log-email)) '(("^[ |]+Author: \\(.*\\)" (1 'change-log-email))
("^[ |]+Date: \\(.*\\)" (1 'change-log-date-face)))))) ("^[ |]+Date: \\(.*\\)" (1 'change-log-date))))))
;; (defun vc-mtn-show-log-entry (revision) ;; (defun vc-mtn-show-log-entry (revision)
;; ) ;; )