From 15f48bfc6b52d112f3c3fd98e533bda9138ffdd2 Mon Sep 17 00:00:00 2001 From: Jared Finder Date: Tue, 11 Jun 2024 15:32:04 -0700 Subject: [PATCH] Add support for window-tool-bar, added in Emacs 30. --- CHANGELOG.md | 1 + zenburn-theme.el | 10 ++++++++++ 2 files changed, 11 insertions(+) diff --git a/CHANGELOG.md b/CHANGELOG.md index 75a4d15..aea1b2d 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -5,6 +5,7 @@ ### New features * Add `corfu` support. +* Add `window-tool-bar` support. ## 2.8 (2023-03-15) diff --git a/zenburn-theme.el b/zenburn-theme.el index 3ab1a02..c309189 100644 --- a/zenburn-theme.el +++ b/zenburn-theme.el @@ -1693,6 +1693,16 @@ Also bind `class' to ((class color) (min-colors 89))." `(wl-highlight-summary-displaying-face ((t (:underline t :weight bold)))) ;;;;; which-func-mode `(which-func ((t (:foreground ,zenburn-green+4)))) +;;;;; window-tool-bar-mode + `(window-tool-bar-button ((t (:foreground ,zenburn-fg + :background ,zenburn-bg + :box (:line-width -1 :style released-button))))) + `(window-tool-bar-button-hover ((t (:foreground ,zenburn-fg + :background ,zenburn-bg+1 + :box (:line-width -1 :style released-button))))) + `(window-tool-bar-button-disabled ((t (:foreground ,zenburn-fg + :background ,zenburn-bg+3 + :box (:line-width -1 :style released-button))))) ;;;;; xcscope `(cscope-file-face ((t (:foreground ,zenburn-yellow :weight bold)))) `(cscope-function-face ((t (:foreground ,zenburn-cyan :weight bold))))