branch: externals/ef-themes commit 3105d096d434316ccb8f03ab82ee30fbd86dbe33 Author: Protesilaos Stavrou <i...@protesilaos.com> Commit: Protesilaos Stavrou <i...@protesilaos.com>
Stop using :style flat-button for Emacs 27 compat This style is for Emacs 28+. We thus have to use the relevant background value as the border's color. --- ef-themes.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/ef-themes.el b/ef-themes.el index de7ebe59dd..eff6d11051 100644 --- a/ef-themes.el +++ b/ef-themes.el @@ -1330,17 +1330,17 @@ Helper function for `ef-themes-preview-colors'." `(smerge-upper ((,c :inherit diff-removed))) ;;;; tab-bar-mode `(tab-bar ((,c :inherit ef-themes-ui-variable-pitch :background ,bg-alt))) - `(tab-bar-tab-group-current ((,c :inherit bold :background ,bg-main :box (:line-width (2 . -2) :style flat-button) :foreground ,fg-alt))) - `(tab-bar-tab-group-inactive ((,c :background ,bg-alt :box (:line-width (2 . -2) :style flat-button) :foreground ,fg-alt))) - `(tab-bar-tab ((,c :inherit bold :box (:line-width (2 . -2) :style flat-button) :background ,bg-main :foreground ,fg-main))) - `(tab-bar-tab-inactive ((,c :box (:line-width (2 . -2) :style flat-button) :background ,bg-dim :foreground ,fg-dim))) + `(tab-bar-tab-group-current ((,c :inherit bold :background ,bg-main :box (:line-width (2 . -2) :color ,bg-main) :foreground ,fg-alt))) + `(tab-bar-tab-group-inactive ((,c :background ,bg-alt :box (:line-width (2 . -2) :color ,bg-alt) :foreground ,fg-alt))) + `(tab-bar-tab ((,c :inherit bold :box (:line-width (2 . -2) :color ,bg-main) :background ,bg-main :foreground ,fg-main))) + `(tab-bar-tab-inactive ((,c :box (:line-width (2 . -2) :color ,bg-dim) :background ,bg-dim :foreground ,fg-dim))) ;;;; tab-line-mode `(tab-line ((,c :inherit ef-themes-ui-variable-pitch :background ,bg-alt :height 0.95))) `(tab-line-close-highlight ((,c :foreground ,err))) `(tab-line-highlight ((,c :inherit highlight))) `(tab-line-tab (( ))) - `(tab-line-tab-current ((,c :inherit bold :box (:line-width (2 . -2) :style flat-button) :background ,bg-main :foreground ,fg-main))) - `(tab-line-tab-inactive ((,c :box (:line-width (2 . -2) :style flat-button) :background ,bg-dim :foreground ,fg-dim))) + `(tab-line-tab-current ((,c :inherit bold :box (:line-width (2 . -2) :color ,bg-main) :background ,bg-main :foreground ,fg-main))) + `(tab-line-tab-inactive ((,c :box (:line-width (2 . -2) :color ,bg-dim) :background ,bg-dim :foreground ,fg-dim))) `(tab-line-tab-inactive-alternate ((,c :inherit tab-line-tab-inactive :foreground ,fg-alt))) `(tab-line-tab-modified ((,c :foreground ,warning))) ;;;; term