Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

Add all epa faces to epa-faces Custom group

Browse source 
`epa-validity-face-alist' isn't actually a face but belongs
in that group anyway.

* lisp/epa.el (epa-field-name, epa-field-body)
(epa-validity-face-alist): Add to epa-faces Custom group.
This commit is contained in:
Jonas Bernoulli 2020-02-18 16:49:19 +01:00
parent c2ef4a13c0
commit bb6fe683a2
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/epa.el
View file

@ -117,13 +117,15 @@ The command `epa-mail-encrypt' uses this."
'((default :weight bold)
(((class color) (background dark)) :foreground "PaleTurquoise"))
"Face for the name of the attribute field."
:group 'epa)
:version "28.1"
:group 'epa-faces)
(defface epa-field-body
'((default :slant italic)
(((class color) (background dark)) :foreground "turquoise"))
"Face for the body of the attribute field."
:group 'epa)
:version "28.1"
:group 'epa-faces)
(defcustom epa-validity-face-alist
'((unknown . epa-validity-disabled)
@ -138,8 +140,9 @@ The command `epa-mail-encrypt' uses this."
(full . epa-validity-high)
(ultimate . epa-validity-high))
"An alist mapping validity values to faces."
:version "28.1"
:type '(repeat (cons symbol face))
:group 'epa)
:group 'epa-faces)
(defvar epa-font-lock-keywords
'(("^\\*"