masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-17 17:29:30 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Don't check for existence of defface

Browse source 
* lisp/net/dictionary.el: defface has been available in Emacs for quite
some time now. No need to check it before using it.
This commit is contained in:
Torsten Hilbrich 2020-10-08 19:35:50 +02:00
parent 49c250b388
commit 99a7e918c8
1 changed files with 43 additions and 54 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/net/dictionary.el
View file

@ -216,9 +216,6 @@ is utf-8"
)))
:version "28.1")
(if (fboundp 'defface)
(progn
(defface dictionary-word-definition-face
'((((supports (:family "DejaVu Serif")))
(:family "DejaVu Serif"))
@ -267,14 +264,6 @@ is utf-8"
:group 'dictionary
:version "28.1")
)
;; else
(copy-face 'italic 'dictionary-word-entry-face)
(copy-face 'bold 'dictionary-button-face)
(copy-face 'default 'dictionary-reference-face)
(set-face-foreground 'dictionary-reference-face "blue"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Buffer local variables for storing the current state
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;