diff options
| author | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2007-11-04 12:12:00 +0100 |
|---|---|---|
| committer | Andrea Rossato <andrea.rossato@ing.unitn.it> | 2007-11-04 12:12:00 +0100 |
| commit | 9859b0cbfaa6f3b70e7636bc6f53e4d9c8c6da01 (patch) | |
| tree | 7c85c5cd68b8f6e2f5dc38497f938e9ad29fbc7b | |
| parent | 7e98a6e8d47d84b6501c844e30c40b1ae0762e87 (diff) | |
| download | xmobar-9859b0cbfaa6f3b70e7636bc6f53e4d9c8c6da01.tar.gz xmobar-9859b0cbfaa6f3b70e7636bc6f53e4d9c8c6da01.tar.bz2 | |
Window is mapped after properties have been set
darcs-hash:20071104111200-d6583-3ba0889da170886938f84754d9831c5b53068ba4.gz
| -rw-r--r-- | Xmobar.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 () |