diff options
| author | Juri Linkov <juri@linkov.net> | 2023-09-01 09:56:59 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2023-09-01 09:56:59 +0300 |
| commit | 30decd1d9777f44e614622ebfe5f35e719a265ca (patch) | |
| tree | 11e35c6c9e28d85e4e99bec7a55e672830ad6a17 /lisp/tab-bar.el | |
| parent | 6913612def9a6be851f26965554aff74f3bcc2bf (diff) | |
| download | emacs-30decd1d9777f44e614622ebfe5f35e719a265ca.tar.gz | |
Fix height of new SVG icons on tab-bar and tab-line (bug#62562)
* lisp/tab-bar.el (tab-bar--load-buttons): Add ':height (1.0 . em)'
to icons tab-bar-new, tab-bar-menu-bar.
(tab-bar-history-mode): Add ':height (1.0 . em)'
to icons tab-bar-back, tab-bar-forward.
* lisp/tab-line.el (tab-line-new, tab-line-left, tab-line-right):
Add ':height (1.0 . em)' to these icons.
Diffstat (limited to 'lisp/tab-bar.el')
| -rw-r--r-- | lisp/tab-bar.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el index 6b286598a14..fd9294ed581 100644 --- a/lisp/tab-bar.el +++ b/lisp/tab-bar.el @@ -166,6 +166,7 @@ For easier selection of tabs by their numbers, consider customizing (define-icon tab-bar-new nil `((image "symbols/plus_16.svg" "tabs/new.xpm" :face shadow + :height (1.0 . em) :margin ,tab-bar-button-margin :ascent center) ;; (emoji "➕") @@ -195,6 +196,7 @@ For easier selection of tabs by their numbers, consider customizing (unless (iconp 'tab-bar-menu-bar) (define-icon tab-bar-menu-bar nil `((image "symbols/menu_16.svg" + :height (1.0 . em) :margin ,tab-bar-button-margin :ascent center) ;; (emoji "🍔") @@ -2285,6 +2287,7 @@ and can restore them." (unless (iconp 'tab-bar-back) (define-icon tab-bar-back nil `((image "symbols/chevron_left_16.svg" "tabs/left-arrow.xpm" + :height (1.0 . em) :margin ,tab-bar-button-margin :ascent center) (text " < ")) @@ -2295,6 +2298,7 @@ and can restore them." (unless (iconp 'tab-bar-forward) (define-icon tab-bar-forward nil `((image "symbols/chevron_right_16.svg" "tabs/right-arrow.xpm" + :height (1.0 . em) :margin ,tab-bar-button-margin :ascent center) (text " > ")) |