diff options
Diffstat (limited to 'src/Xmobar.hs')
| -rw-r--r-- | src/Xmobar.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Xmobar.hs b/src/Xmobar.hs index 1ae55bb..adbe956 100644 --- a/src/Xmobar.hs +++ b/src/Xmobar.hs @@ -144,6 +144,9 @@ eventLoop tv xc@(XConf d _ w fs cfg) signal = do Reveal -> reveal Toggle -> toggle + TogglePersistent -> eventLoop + tv xc { config = cfg { persistent = not $ persistent cfg } } signal + where isPersistent = not $ persistent cfg |