1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-29 07:58:28 +00:00

Small fixes

* lisp/generic-x.el (etc-passwd-generic-mode): Add comment.  (Bug#34225)

* lisp/vc/diff-mode.el (diff-syntax-fontify-hunk): Set overlay
property 'diff-mode to 'syntax.  (Bug#33567)
(diff-syntax-fontify-props): Reset buffer-file-name to nil.
This commit is contained in:
Juri Linkov 2019-01-28 23:17:04 +02:00
parent 020f623372
commit 137b65a9b0
2 changed files with 3 additions and 0 deletions

View File

@ -1490,6 +1490,7 @@ like an INI file. You can add this hook to `find-file-hook'."
'("^\\([^:]+\\):\\([^:]*\\):\\([0-9]+\\):\\(.*\\)$"
(1 font-lock-type-face)
(4 font-lock-variable-name-face))))
;; /etc/passwd- is a backup file for /etc/passwd, so is group- and shadow-
'("/etc/passwd-?\\'" "/etc/group-?\\'" "/etc/shadow-?\\'")
(list
(function

View File

@ -2488,6 +2488,7 @@ When OLD is non-nil, highlight the hunk from the old source."
(let ((ol (make-overlay (+ bol (nth 0 prop))
(+ bol (nth 1 prop))
nil 'front-advance nil)))
(overlay-put ol 'diff-mode 'syntax)
(overlay-put ol 'evaporate t)
(overlay-put ol 'face (nth 2 prop))))))))))))
@ -2502,6 +2503,7 @@ hunk text is not found in the source file."
(unless no-init
(buffer-disable-undo)
(font-lock-mode -1)
(setq buffer-file-name nil)
(let ((enable-local-variables :safe) ;; to find `mode:'
(buffer-file-name file))
(set-auto-mode)