[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/spacious-padding 50eee7a880: Cover the tab-line-tab-cur
From: |
ELPA Syncer |
Subject: |
[elpa] externals/spacious-padding 50eee7a880: Cover the tab-line-tab-current face |
Date: |
Tue, 30 Jul 2024 06:58:57 -0400 (EDT) |
branch: externals/spacious-padding
commit 50eee7a8804637faa364f7332452622ca0b18fe7
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Cover the tab-line-tab-current face
Thanks to domsch1988 for pointing out mismatching heights due to us
not modifying this face. This was done in issue 20:
<https://github.com/protesilaos/spacious-padding/issues/20>.
---
README.org | 2 +-
spacious-padding.el | 3 ++-
2 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/README.org b/README.org
index 221358ce44..df7e4634ad 100644
--- a/README.org
+++ b/README.org
@@ -282,7 +282,7 @@ help matters.
+ Ideas and/or user feedback :: Aronne Raimondi, Damien Cassou, Julian
Flake, Lucas Gruss, Nicolas Semrau, Stefano Rodighiero, Tomasz
- Hołubowicz, tusharhero.
+ Hołubowicz, domsch1988, tusharhero.
Inspiration for this package comes from Nicolas Rougier's impressive
designs and Daniel Mendler's ~org-modern~ package:
diff --git a/spacious-padding.el b/spacious-padding.el
index c8b2bef1d3..ccfaf50d93 100644
--- a/spacious-padding.el
+++ b/spacious-padding.el
@@ -196,7 +196,7 @@ Examples of valid configurations:
"Tab faces relevant to `spacious-padding-mode'.")
(defvar spacious-padding--tab-line-faces
- '(tab-line tab-line-tab tab-line-tab-inactive)
+ '(tab-line tab-line-tab tab-line-tab-inactive tab-line-tab-current)
"Tab faces relevant to `spacious-padding-mode'.")
(defun spacious-padding--get-right-divider-width (&optional no-fallback)
@@ -302,6 +302,7 @@ hooks that pass one or more arguments to it, such as
`(tab-line-tab ((t ,@(spacious-padding-set-face-box-padding 'tab-line-tab
'tab-line))))
`(tab-line-tab-inactive ((t ,@(spacious-padding-set-face-box-padding
'tab-line-tab-inactive 'tab-line))))
`(tab-line-tab-active ((t ,@(spacious-padding-set-face-box-padding
'tab-line-tab-active 'tab-line))))
+ `(tab-line-tab-current ((t ,@(spacious-padding-set-face-box-padding
'tab-line-tab-current 'tab-line))))
`(vertical-border ((t :background ,bg-main :foreground ,bg-main)))
`(,@(spacious-padding-set-window-divider 'window-divider bg-main))
`(,@(spacious-padding-set-window-divider 'window-divider-first-pixel
bg-main))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/spacious-padding 50eee7a880: Cover the tab-line-tab-current face,
ELPA Syncer <=