summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorJochen Keil <jochen.keil@gmail.com>2012-09-01 21:37:46 +0200
committerJochen Keil <jochen.keil@gmail.com>2012-09-01 21:37:46 +0200
commit6dd88a76c61b2926ad553e50182aa8758ecbb69d (patch)
treedd5aba929808f644d9e0f8981a115c23475e7538
parent922dfa2cfac8b546c2a6c76421533f102804bb87 (diff)
downloadxmobar-6dd88a76c61b2926ad553e50182aa8758ecbb69d.tar.gz
xmobar-6dd88a76c61b2926ad553e50182aa8758ecbb69d.tar.bz2
Pass the timeout value unchanged to the toggle function
Since the timeout is passed on as hide or reveal signal, it must not be changed or the multiplications will pile up.
-rw-r--r--src/Xmobar.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar.hs b/src/Xmobar.hs
index 6be0d0c..a74db7d 100644
--- a/src/Xmobar.hs
+++ b/src/Xmobar.hs
@@ -148,7 +148,7 @@ eventLoop tv xc@(XConf d _ w fs cfg) signal = do
Hide t -> hide (t*100*1000)
Reveal t -> reveal (t*100*1000)
- Toggle t -> toggle (t*100*1000)
+ Toggle t -> toggle t
TogglePersistent -> eventLoop
tv xc { config = cfg { persistent = not $ persistent cfg } } signal