emacs: make faces readable on dark backgrounds.

The notmuch-tag-flagged, notmuch-search-flagged-face and
notmuch-crypto-part-header faces defaulted to "blue", which is nearly
unreadable when a dark background is in use.  This is addressed by using
"LightBlue1" for dark backgrounds.

As a side effect, these faces are now no-op definitions for grayscale or
mono displays.
This commit is contained in:
Matt Armstrong 2016-10-28 15:31:42 -07:00 committed by David Bremner
parent 429c30c2bc
commit d62f9dbfc0
3 changed files with 17 additions and 3 deletions

View file

@ -42,7 +42,12 @@ mode."
:group 'notmuch-crypto) :group 'notmuch-crypto)
(defface notmuch-crypto-part-header (defface notmuch-crypto-part-header
'((t (:foreground "blue"))) '((((class color)
(background dark))
(:foreground "LightBlue1"))
(((class color)
(background light))
(:foreground "blue")))
"Face used for crypto parts headers." "Face used for crypto parts headers."
:group 'notmuch-crypto :group 'notmuch-crypto
:group 'notmuch-faces) :group 'notmuch-faces)

View file

@ -115,7 +115,12 @@ Used in the default value of `notmuch-tag-formats`."
:group 'notmuch-faces) :group 'notmuch-faces)
(defface notmuch-tag-flagged (defface notmuch-tag-flagged
'((t :foreground "blue")) '((((class color)
(background dark))
(:foreground "LightBlue1"))
(((class color)
(background light))
(:foreground "blue")))
"Face used for the flagged tag. "Face used for the flagged tag.
Used in the default value of `notmuch-tag-formats`." Used in the default value of `notmuch-tag-formats`."

View file

@ -313,7 +313,11 @@ there will be called at other points of notmuch execution."
:group 'notmuch-faces) :group 'notmuch-faces)
(defface notmuch-search-flagged-face (defface notmuch-search-flagged-face
'((t '((((class color)
(background dark))
(:foreground "LightBlue1"))
(((class color)
(background light))
(:foreground "blue"))) (:foreground "blue")))
"Face used in search mode face for flagged threads. "Face used in search mode face for flagged threads.