diff options
| author | Jochen Keil <jochen.keil@gmail.com> | 2012-08-13 07:28:55 +0200 |
|---|---|---|
| committer | Jochen Keil <jochen.keil@gmail.com> | 2012-08-13 07:28:55 +0200 |
| commit | b8cf77207eb7dfa99f842f5b7e63fee95efe3796 (patch) | |
| tree | 2291f54f171aa4a5d3730d017c73c0d87c345a5d /src | |
| parent | abb0b488741fc2f20a1486a6f122f7f6fa38e92d (diff) | |
| download | xmobar-b8cf77207eb7dfa99f842f5b7e63fee95efe3796.tar.gz xmobar-b8cf77207eb7dfa99f842f5b7e63fee95efe3796.tar.bz2 | |
Revert lowerOnStart to its original behaviour
I misunderstood the intention of lowerOnStart and changed the
implementation to what I thought it would have to do. This was wrong
indeed, so back to original behaviour.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Window.hs | 1 | ||||
| -rw-r--r-- | src/Xmobar.hs | 1 |
2 files changed, 1 insertions, 1 deletions
diff --git a/src/Window.hs b/src/Window.hs index 9024fff..50bfc56 100644 --- a/src/Window.hs +++ b/src/Window.hs @@ -24,6 +24,7 @@ createWin d fs c = do (r,o) = setPosition (position c) srs (fi ht) win <- newWindow d (defaultScreenOfDisplay d) rootw r o setProperties r c d win srs + when (lowerOnStart c) (lowerWindow d win) mapWindow d win return (r,win) diff --git a/src/Xmobar.hs b/src/Xmobar.hs index d758301..5328b6e 100644 --- a/src/Xmobar.hs +++ b/src/Xmobar.hs @@ -78,7 +78,6 @@ runX xc f = runReaderT f xc startLoop :: XConf -> MVar SignalType -> [[(Maybe ThreadId, TVar String)]] -> IO () startLoop xcfg@(XConf _ _ w _ conf) sig vs = do tv <- atomically $ newTVar [] - when (lowerOnStart conf) $ putMVar sig Hide _ <- forkIO (checker tv [] vs sig `catch` \(SomeException _) -> void (putStrLn "Thread checker failed")) #ifdef THREADED_RUNTIME |