procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add log-edit-summary-separator face (bug#58092)

Browse source 
* lisp/vc/log-edit.el (log-edit-summary-separator): Add new face.
(log-edit-font-lock-keywords): Replace hardcoded face attributes with
named face.
* etc/NEWS: Announce the new face.
This commit is contained in:
Protesilaos Stavrou 2022-09-26 15:41:18 +03:00
parent 9b73c9edda
commit a386833503
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA
2 changed files with 11 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
etc/NEWS
View file

@ -1766,6 +1766,11 @@ Writing shorter summary lines avoids truncation in contexts in which
Git commands display summary lines. See the two new user options
'vc-git-log-edit-summary-target-len' and 'vc-git-log-edit-summary-max-len'.
---
*** New 'log-edit-headers-separator' face
It is used to style the line that separates the 'log-edit' headers
from the 'log-edit' summary.
** Message
---

7
lisp/vc/log-edit.el
View file

@ -325,6 +325,11 @@ automatically."
(defface log-edit-summary '((t :inherit font-lock-function-name-face))
"Face for the summary in `log-edit-mode' buffers.")
(defface log-edit-headers-separator
'((t :height 0.1 :inverse-video t :extend t))
"Face for the separator line in `log-edit-mode' buffers."
:version "29.1")
(defface log-edit-header '((t :inherit font-lock-keyword-face))
"Face for the headers in `log-edit-mode' buffers.")
@ -393,7 +398,7 @@ The first subexpression is the actual text of the field.")
nil lax))
("^\n"
(progn (goto-char (match-end 0)) (1+ (match-end 0))) nil
(0 '(face (:height 0.1 :inverse-video t :extend t)
(0 '(face log-edit-headers-separator
display-line-numbers-disable t rear-nonsticky t))))
(log-edit--match-first-line (0 'log-edit-summary))))