From 9eac12fe51ca1079f5085c39b1651997ce4dd24a Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Wed, 9 Sep 2020 23:45:37 -0700 Subject: [PATCH] =?UTF-8?q?Use=20=E2=80=98window-default-font-height?= =?UTF-8?q?=E2=80=99,=20not=20=E2=80=98window-mode-line-height=E2=80=99?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit ‘window-mode-line-height’ seems to also include the border around the mode-line, which for the icons I think we generally don’t want to have happen. A better option would be to use something that gets the font height specifically in the mode-line, but right now I can’t think of a good way to get at this. --- mode-icons.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mode-icons.el b/mode-icons.el index cfa68ec..5bc4415 100644 --- a/mode-icons.el +++ b/mode-icons.el @@ -512,7 +512,7 @@ This uses `window-mode-line-height' on emacs 24.4+. Otherwise it assumes 16. This function also adjusts the line height by `mode-icons-line-height-adjust'." (+ mode-icons-line-height-adjust - (or (and (fboundp 'window-mode-line-height) (window-mode-line-height window)) 16))) + (or (and (fboundp 'window-mode-line-height) (window-default-font-height window)) 16))) (defun mode-icons-get-icon-display (icon type &optional face active) "Get the value for the display property of ICON having TYPE.