From 7285c433ae05e1fb672a5f0aae122da81b76181e Mon Sep 17 00:00:00 2001 From: Vincent Zhang Date: Fri, 4 Jan 2019 02:09:32 +0800 Subject: [PATCH] Fix: font size of vcs in daemon mode. --- doom-modeline.el | 24 ++++++++++++++---------- 1 file changed, 14 insertions(+), 10 deletions(-) diff --git a/doom-modeline.el b/doom-modeline.el index 734e210..f219e83 100644 --- a/doom-modeline.el +++ b/doom-modeline.el @@ -1052,15 +1052,19 @@ Uses `all-the-icons-octicon' to fetch the icon." (let ((active (doom-modeline--active))) (when-let ((icon (or doom-modeline--vcs-icon (doom-modeline--update-vcs-icon))) (text (or doom-modeline--vcs-text (doom-modeline--update-vcs-text)))) - (concat " " - (if active - icon - (propertize icon 'face `(:height 1.2 :family ,(all-the-icons-icon-family icon) :inherit))) - doom-modeline-vspc - (if active - text - (propertize text 'face 'mode-line-inactive)) - " ")))) + (concat + " " + (if active + (concat icon doom-modeline-vspc text) + (concat + (propertize icon + 'face + (if doom-modeline-icon + `(:height 1.2 :family ,(all-the-icons-icon-family icon) :inherit) + 'mode-line-inactive)) + doom-modeline-vspc + (propertize text 'face 'mode-line-inactive))) + " ")))) ;; @@ -1326,7 +1330,7 @@ icons." (propertize icon 'face (if doom-modeline-icon - `(:height 1.3 :family ,(all-the-icons-icon-family icon)) + `(:height 1.3 :family ,(all-the-icons-icon-family icon :inherit)) 'mode-line-inactive)) doom-modeline-vspc (propertize text 'face 'mode-line-inactive)))