[Emacs-diffs] master 674515d: Use variable-pitch fonts in tab-bar and tab-line faces

[Juri Linkov]

branch: master
commit 674515dd75aea441bc8847a73da18ddd303668e1
Author: Juri Linkov <address@hidden>
Commit: Juri Linkov <address@hidden>

    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.
---
 lisp/tab-bar.el  | 5 ++++-
 lisp/tab-line.el | 8 +++++---
 2 files changed, 9 insertions(+), 4 deletions(-)

diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index b7de64d..e96d5d1 100644
--- 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 b552df9..69b510b 100644
--- 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."