diff options
| author | Jochen Keil <jochen.keil@gmail.com> | 2012-08-10 08:42:32 +0200 |
|---|---|---|
| committer | Jochen Keil <jochen.keil@gmail.com> | 2012-08-10 08:42:32 +0200 |
| commit | 509eee4e98b5a9a1362a87f0d88e317d08b4dec2 (patch) | |
| tree | 3ea184cb8fe55e20bc96a544197e32f86a95f628 /src/Xmobar.hs | |
| parent | 5074fdf2d6aa85ce17ad98112ec5019eb05a39c4 (diff) | |
| download | xmobar-509eee4e98b5a9a1362a87f0d88e317d08b4dec2.tar.gz xmobar-509eee4e98b5a9a1362a87f0d88e317d08b4dec2.tar.bz2 | |
New SignalType TogglePersistent
By sending a TogglePersistent signal the configuration option
"persistent" can be changed. Thus it is possible to hide or show xmobar
constantly.
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 |