From 9859b0cbfaa6f3b70e7636bc6f53e4d9c8c6da01 Mon Sep 17 00:00:00 2001 From: Andrea Rossato Date: Sun, 4 Nov 2007 12:12:00 +0100 Subject: Window is mapped after properties have been set darcs-hash:20071104111200-d6583-3ba0889da170886938f84754d9831c5b53068ba4.gz --- Xmobar.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Xmobar.hs b/Xmobar.hs index 5b20aeb..d77b91c 100644 --- a/Xmobar.hs +++ b/Xmobar.hs @@ -140,8 +140,8 @@ createWin d fs c = do Static cx cy cw ch -> (fi cx,fi cy,fi cw,fi ch,True) win <- mkUnmanagedWindow d (defaultScreenOfDisplay d) rootw x y w h o selectInput d win (exposureMask .|. structureNotifyMask) - mapWindow d win setProperties h c d win + mapWindow d win return (Rectangle x y w h,win) setProperties :: Dimension -> Config -> Display -> Window -> IO () -- cgit v1.2.3