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.

3 files changed, 1 insertions, 4 deletions

diff --git a/readme.md b/readme.md
index 1c13d27..7d06087 100644
--- a/readme.md
+++ b/readme.md
@@ -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