From ec4f2723c13321f2abe6aa57035146d80b640db6 Mon Sep 17 00:00:00 2001 From: "Basil L. Contovounesios" Date: Tue, 20 Oct 2020 17:28:26 +0100 Subject: [PATCH] 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. --- lisp/emacs-lisp/shortdoc.el | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el index f6309c7652e..7ae6d53a21b 100644 --- a/lisp/emacs-lisp/shortdoc.el +++ b/lisp/emacs-lisp/shortdoc.el @@ -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) -- 2.39.2