From 8aaa57d97303cea16d575bd15c721710cda10399 Mon Sep 17 00:00:00 2001 From: SqrtMinusOne Date: Thu, 6 Jan 2022 10:20:13 +0300 Subject: [PATCH] fix: do not update the modeline on start --- exwm-modeline.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/exwm-modeline.el b/exwm-modeline.el index 859c652..6a54c5f 100644 --- a/exwm-modeline.el +++ b/exwm-modeline.el @@ -63,7 +63,8 @@ workspaces." :type 'boolean :set (lambda (sym value) (set-default sym value) - (exwm-modeline-update))) + (when exwm-modeline-mode + (exwm-modeline-update)))) (defcustom exwm-modeline-randr t "When set, only show workspaces on the current monitor." @@ -71,7 +72,8 @@ workspaces." :type 'boolean :set (lambda (sym value) (set-default sym value) - (exwm-modeline-update))) + (when exwm-modeline-mode + (exwm-modeline-update)))) (defcustom exwm-modeline-display-urgent t "When set, display the urgent status in the modeline. @@ -82,8 +84,8 @@ switch, so the number of updates is increased significantly." :type 'boolean :set (lambda (sym value) (set-default sym value) - (exwm-modeline-update) (when exwm-modeline-mode + (exwm-modeline-update) (if value (progn (advice-add #'exwm--update-hints :after #'exwm-modeline--urgency-advice)