sqrtminusone/exwm-modeline
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/exwm-modeline.git synced 2025-12-10 14:35:14 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix: melpa/melpa#7851

Browse source
This commit is contained in:
Pavel Korytov 2022-01-09 11:04:49 +03:00
parent 8aaa57d973
commit 4c77d4e3df
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
exwm-modeline.el
View file

@ -63,7 +63,7 @@ workspaces."
:type 'boolean :type 'boolean
:set (lambda (sym value) :set (lambda (sym value)
(set-default sym value) (set-default sym value)
(when exwm-modeline-mode (when (bound-and-true-p exwm-modeline-mode)
(exwm-modeline-update)))) (exwm-modeline-update))))
(defcustom exwm-modeline-randr t (defcustom exwm-modeline-randr t
@ -72,7 +72,7 @@ workspaces."
:type 'boolean :type 'boolean
:set (lambda (sym value) :set (lambda (sym value)
(set-default sym value) (set-default sym value)
(when exwm-modeline-mode (when (bound-and-true-p exwm-modeline-mode)
(exwm-modeline-update)))) (exwm-modeline-update))))
(defcustom exwm-modeline-display-urgent t (defcustom exwm-modeline-display-urgent t
@ -84,7 +84,7 @@ switch, so the number of updates is increased significantly."
:type 'boolean :type 'boolean
:set (lambda (sym value) :set (lambda (sym value)
(set-default sym value) (set-default sym value)
(when exwm-modeline-mode (when (bound-and-true-p exwm-modeline-mode)
(exwm-modeline-update) (exwm-modeline-update)
(if value (if value
(progn (progn