summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar.hs
diff options
context:
space:
mode:
authorJochen Keil <jochen.keil@gmail.com>2012-08-10 08:42:32 +0200
committerJochen Keil <jochen.keil@gmail.com>2012-08-10 08:42:32 +0200
commit509eee4e98b5a9a1362a87f0d88e317d08b4dec2 (patch)
tree3ea184cb8fe55e20bc96a544197e32f86a95f628 /src/Xmobar.hs
parent5074fdf2d6aa85ce17ad98112ec5019eb05a39c4 (diff)
downloadxmobar-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.hs3
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