Commit 1c1e0fe5 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

Alternative colors for standard faces if dark background.

parent 338992a5
...@@ -1584,15 +1584,23 @@ examine the brightness for you." ...@@ -1584,15 +1584,23 @@ examine the brightness for you."
(underline "Underline text." ((t (:underline t)))) (underline "Underline text." ((t (:underline t))))
(default "Used for text not covered by other faces." ((t nil))) (default "Used for text not covered by other faces." ((t nil)))
(highlight "Highlight text in some way." (highlight "Highlight text in some way."
((((class color)) (:background "darkseagreen2")) ((((class color) (background light))
(:background "darkseagreen2"))
(((class color) (background dark))
(:background "darkolivegreen"))
(t (:inverse-video t)))) (t (:inverse-video t))))
(modeline "Used for displaying the modeline." (modeline "Used for displaying the modeline."
((t (:inverse-video t)))) ((t (:inverse-video t))))
(region "Used for displaying the region." (region "Used for displaying the region."
((t (:background "gray")))) ((((class color) (background dark))
(:background "blue"))
(t (:background "gray"))))
(secondary-selection (secondary-selection
"Used for displaying the secondary selection." "Used for displaying the secondary selection."
((((class color)) (:background "paleturquoise")) ((((class color) (background light))
(:background "paleturquoise"))
(((class color) (background dark))
(:background "darkslateblue"))
(t (:inverse-video t)))))) (t (:inverse-video t))))))
entry symbol doc spec) entry symbol doc spec)
(while all (while all
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment