emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/tuareg 382c09c 1/6: Better face for extension nodes on dar


From: ELPA Syncer
Subject: [nongnu] elpa/tuareg 382c09c 1/6: Better face for extension nodes on dark background
Date: Thu, 8 Jul 2021 23:57:19 -0400 (EDT)

branch: elpa/tuareg
commit 382c09c00b662da16287c4614e68186236fcf188
Author: Mattias EngdegÄrd <mattiase@acm.org>
Commit: Mattias EngdegÄrd <mattiase@acm.org>

    Better face for extension nodes on dark background
    
    `tuareg-font-lock-extension-node-face` was nigh-unreadable when using
    a dark background mode: lightsteelblue (#b0c4de) on grey92 (#ebebeb).
    Use the user's default background instead.
---
 tuareg.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/tuareg.el b/tuareg.el
index 16fceea..8608a89 100644
--- a/tuareg.el
+++ b/tuareg.el
@@ -460,8 +460,9 @@ Valid names are `browse-url', `browse-url-firefox', etc."
 
 (defface tuareg-font-lock-extension-node-face
   (if tuareg-faces-inherit-p
-      '((t :inherit tuareg-font-lock-infix-extension-node-face
-           :background "gray92"))
+      '((default :inherit tuareg-font-lock-infix-extension-node-face)
+        (((background dark)) :foreground "LightSteelBlue")
+        (t :background "gray92"))
     '((((background light)) (:foreground "Orchid" :background "gray92"))
       (((background dark)) (:foreground "LightSteelBlue" :background "gray92"))
       (t (:foreground "LightSteelBlue"))))



reply via email to

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