]> git.eshelyaron.com Git - emacs.git/commitdiff
Copy parent face attributes to tab-line-tab-current instead of inheriting face
authorJuri Linkov <juri@linkov.net>
Mon, 11 Oct 2021 18:27:50 +0000 (21:27 +0300)
committerJuri Linkov <juri@linkov.net>
Mon, 11 Oct 2021 18:27:50 +0000 (21:27 +0300)
* lisp/tab-line.el (tab-line-tab-current): Don't inherit face from
'tab-line-tab' to not inherit the face attribute :height from 'tab-line',
because :height of mouse-face is added to the base face.
Copy here most of the parent face attributes (bug#50798).

lisp/tab-line.el

index 890d1243e73d5d3836bf7fe35f5896008584dfb8..78c06bbb64d3d5c82f35d6ad138682055152d4d3 100644 (file)
@@ -119,7 +119,11 @@ function `tab-line-tab-face-group'."
   :group 'tab-line-faces)
 
 (defface tab-line-highlight
-  '((t :inherit tab-line-tab))
+  '((((class color) (min-colors 88))
+     :box (:line-width 1 :style released-button)
+     :background "grey85"
+     :foreground "black")
+    (t :inverse-video nil))
   "Tab line face for highlighting."
   :version "27.1"
   :group 'tab-line-faces)