procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; * tab-bar, tab-line: Use integer 1 instead of float for height em.

Browse source
This commit is contained in:
Juri Linkov 2023-09-19 20:44:16 +03:00
parent b03338c70d
commit 3c14cab797
2 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/tab-bar.el
View file

@ -161,7 +161,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)
:height (1 . em)
:margin ,tab-bar-button-margin
:ascent center)
;; (emoji "➕")
@ -176,7 +176,7 @@ For easier selection of tabs by their numbers, consider customizing
(define-icon tab-bar-close nil
`((image "symbols/cross_16.svg" "tabs/close.xpm"
:face shadow
:height (1.0 . em)
:height (1 . em)
:margin ,tab-bar-button-margin
:ascent center)
;; (emoji " ❌")
@ -191,7 +191,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)
:height (1 . em)
:margin ,tab-bar-button-margin
:ascent center)
;; (emoji "🍔")
@ -2282,7 +2282,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)
:height (1 . em)
:margin ,tab-bar-button-margin
:ascent center)
(text " < "))
@ -2293,7 +2293,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)
:height (1 . em)
:margin ,tab-bar-button-margin
:ascent center)
(text " > "))

8
lisp/tab-line.el
View file

@ -194,7 +194,7 @@ If the value is a function, call it with no arguments."
(define-icon tab-line-new nil
`((image "symbols/plus_16.svg" "tabs/new.xpm"
:face shadow
:height (1.0 . em)
:height (1 . em)
:margin (2 . 0)
:ascent center)
(text " + "))
@ -230,7 +230,7 @@ If nil, don't show it at all."
(define-icon tab-line-close nil
`((image "symbols/cross_16.svg" "tabs/close.xpm"
:face shadow
:height (1.0 . em)
:height (1 . em)
:margin (2 . 0)
:ascent center)
(text " x"))
@ -249,7 +249,7 @@ If nil, don't show it at all."
(define-icon tab-line-left nil
`((image "symbols/chevron_left_16.svg" "tabs/left-arrow.xpm"
:face shadow
:height (1.0 . em)
:height (1 . em)
:margin (2 . 0)
:ascent center)
(text " <"))
@ -267,7 +267,7 @@ If nil, don't show it at all."
(define-icon tab-line-right nil
`((image "symbols/chevron_right_16.svg" "tabs/right-arrow.xpm"
:face shadow
:height (1.0 . em)
:height (1 . em)
:margin (2 . 0)
:ascent center)
(text "> "))