Simplify syntax of shortdoc face specs

* lisp/emacs-lisp/shortdoc.el: Remove unused dependency.
(shortdoc-section, shortdoc-example): Use newer (DISPLAY . PLIST)
face spec syntax.
This commit is contained in:
Basil L. Contovounesios 2020-10-20 17:28:26 +01:00
parent 6a946d29a1
commit ec4f2723c1

View file

@ -24,7 +24,6 @@
;;; Code:
(require 'macroexp)
(require 'seq)
(eval-when-compile (require 'cl-lib))
@ -34,18 +33,16 @@
(defface shortdoc-section
'((((class color) (background dark))
(:inherit variable-pitch
:background "#303030" :extend t))
:inherit variable-pitch :background "#303030" :extend t)
(((class color) (background light))
(:inherit variable-pitch
:background "#f0f0f0" :extend t)))
:inherit variable-pitch :background "#f0f0f0" :extend t))
"Face used for a section.")
(defface shortdoc-example
'((((class color) (background dark))
(:background "#202020" :extend t))
:background "#202020" :extend t)
(((class color) (background light))
(:background "#e8e8e8" :extend t)))
:background "#e8e8e8" :extend t))
"Face used for examples.")
(defvar shortdoc--groups nil)