diff options
| -rw-r--r-- | readme.md | 3 | ||||
| -rw-r--r-- | src/Window.hs | 1 | ||||
| -rw-r--r-- | src/Xmobar.hs | 1 |
3 files changed, 1 insertions, 4 deletions
@@ -221,9 +221,6 @@ Other configuration options: : position = Top -`lowerOnStart` -: When True the window is initially hidden (can be toggled) - `persistent` : When True the window status is fixed i.e. hiding or revealing is not possible. This option can be toggled at runtime. 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 |