Use variable-pitch fonts in tab-bar and tab-line faces

* lisp/tab-bar.el (tab-bar):
* lisp/tab-line.el (tab-line):
Inherit face from variable-pitch.

diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index b7de64d4ae960bd2c2b8b51fc9aac549f16cde01..e96d5d15b2bce2eff37857e5f8a5d599a0d827dd 100644 (file)
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -51,6 +51,7 @@
 (defface tab-bar
   '((((type x w32 ns) (class color))
      :height 1.1
+     :inherit variable-pitch
      :background "grey85"
      :foreground "black")
     (((type x) (class mono))
@@ -62,7 +63,9 @@
   :group 'tab-bar-faces)
 
 (defface tab-bar-tab
-  '((((class color) (min-colors 88))
+  '((default
+      :inherit tab-bar)
+    (((class color) (min-colors 88))
      :box (:line-width 1 :style released-button))
     (t
      :inverse-video nil))

diff --git a/lisp/tab-line.el b/lisp/tab-line.el
index b552df9ba589757b206ec4193606137370dc4d65..69b510b64c0846f6fa02e3d359c0dfbb8a454081 100644 (file)
--- a/lisp/tab-line.el
+++ b/lisp/tab-line.el
@@ -43,6 +43,7 @@
 
 (defface tab-line
   '((((type x w32 ns) (class color))
+     :inherit variable-pitch
      :background "grey85"
      :foreground "black")
     (((type x) (class mono))
@@ -54,9 +55,10 @@
   :group 'tab-line-faces)
 
 (defface tab-line-tab
-  '((((class color) (min-colors 88))
-     :box (:line-width 1 :style released-button)
-     :background "grey85")
+  '((default
+      :inherit tab-line)
+    (((class color) (min-colors 88))
+     :box (:line-width 1 :style released-button))
     (t
      :inverse-video nil))
   "Tab line face for selected tab."