Fix faces tab-bar and tab-line.

* lisp/tab-bar.el (tab-bar) <defface>:
* lisp/tab-line.el (tab-line) <defface>:
Check for min-colors 88 instead of type x.
This commit is contained in:
Juri Linkov 2020-02-05 01:27:30 +02:00
parent 831508422e
commit ef5fba9f40
2 changed files with 4 additions and 4 deletions

View file

@ -51,11 +51,11 @@
:version "27.1") :version "27.1")
(defface tab-bar (defface tab-bar
'((((type x w32 ns) (class color)) '((((class color) (min-colors 88))
:inherit variable-pitch :inherit variable-pitch
:background "grey85" :background "grey85"
:foreground "black") :foreground "black")
(((type x) (class mono)) (((class mono))
:background "grey") :background "grey")
(t (t
:inverse-video t)) :inverse-video t))

View file

@ -42,12 +42,12 @@
:version "27.1") :version "27.1")
(defface tab-line (defface tab-line
'((((type x w32 ns) (class color)) '((((class color) (min-colors 88))
:inherit variable-pitch :inherit variable-pitch
:height 0.9 :height 0.9
:background "grey85" :background "grey85"
:foreground "black") :foreground "black")
(((type x) (class mono)) (((class mono))
:background "grey") :background "grey")
(t (t
:inverse-video t)) :inverse-video t))