diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2023-12-04 01:33:03 +0100 |
|---|---|---|
| committer | Jonas Bernoulli <jonas@bernoul.li> | 2023-12-04 01:33:03 +0100 |
| commit | cdeda207ba8e67ae8f5e3270a27960ea7f3e2bb4 (patch) | |
| tree | a0a9b0035262f4f48bdcadff0025d29854291bbd | |
| parent | b8aefce365625846451c4ccefce6bc9c107ff64f (diff) | |
Remove unnecessary nesting from some face definitions
| -rw-r--r-- | lisp/transient.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/transient.el b/lisp/transient.el index 13a078b..52f32c9 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -498,10 +498,10 @@ See info node `(transient)Enabling and Disabling Suffixes'." :group 'transient-faces) (defface transient-higher-level - `((t (:box ( :line-width ,(if (>= emacs-major-version 28) (cons -1 -1) -1) - :color ,(let ((color (face-attribute 'shadow :foreground nil t))) - (or (and (not (eq color 'unspecified)) color) - "grey60")))))) + `((t :box ( :line-width ,(if (>= emacs-major-version 28) (cons -1 -1) -1) + :color ,(let ((color (face-attribute 'shadow :foreground nil t))) + (or (and (not (eq color 'unspecified)) color) + "grey60"))))) "Face optionally used to highlight suffixes on higher levels. Also see option `transient-highlight-higher-levels'." :group 'transient-faces) @@ -562,15 +562,15 @@ character used to separate possible values from each other." :group 'transient-faces) (defface transient-nonstandard-key - `((t (:box ( :line-width ,(if (>= emacs-major-version 28) (cons -1 -1) -1) - :color "cyan")))) + `((t :box ( :line-width ,(if (>= emacs-major-version 28) (cons -1 -1) -1) + :color "cyan"))) "Face optionally used to highlight keys conflicting with short-argument. Also see option `transient-highlight-mismatched-keys'." :group 'transient-faces) (defface transient-mismatched-key - `((t (:box ( :line-width ,(if (>= emacs-major-version 28) (cons -1 -1) -1) - :color "magenta")))) + `((t :box ( :line-width ,(if (>= emacs-major-version 28) (cons -1 -1) -1) + :color "magenta"))) "Face optionally used to highlight keys without a short-argument. Also see option `transient-highlight-mismatched-keys'." :group 'transient-faces) |