emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 8415a95: Adjust colors of help-key-binding face for readability


From: Stefan Kangas
Subject: master 8415a95: Adjust colors of help-key-binding face for readability
Date: Sat, 13 Mar 2021 09:26:54 -0500 (EST)

branch: master
commit 8415a9513085d1c307610e2275655699cf7a55d5
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Adjust colors of help-key-binding face for readability
    
    * lisp/faces.el (help-key-binding): Adjust colors for improved
    readability, and use a flat :box for highlighting (with negative
    :line-width height to avoid any vertical resizing of the minibuffer).
    
    This was discussed in:
    https://lists.gnu.org/r/emacs-devel/2021-03/msg00535.html
---
 lisp/faces.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lisp/faces.el b/lisp/faces.el
index 1e668a4..ec650e3 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2816,8 +2816,12 @@ Note: Other faces cannot inherit from the cursor face."
   :group 'help)
 
 (defface help-key-binding
-  '((((class color) (min-colors 88) (background light)) :background "grey90")
-    (((class color) (min-colors 88) (background dark)) :background "grey25")
+  '((((class color) (min-colors 88) (background light))
+     :background "grey92" :foreground "DarkBlue"
+     :box (:line-width (1 . -1) :color "grey80"))
+    (((class color) (min-colors 88) (background dark))
+     :background "grey23" :foreground "LightBlue"
+     :box (:line-width (1 . -1) :color "grey35"))
     (((class color grayscale) (background light)) :background "grey90")
     (((class color grayscale) (background dark)) :background "grey25")
     (t :background "grey90"))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]