diff options
author | David Roundy <droundy@darcs.net> | 2007-10-18 19:00:58 +0200 |
---|---|---|
committer | David Roundy <droundy@darcs.net> | 2007-10-18 19:00:58 +0200 |
commit | cb73c6714004ffdd256b29f53f9c33b7e5388eb9 (patch) | |
tree | 46a155080d2fc52006b2f90860d98a91d6344f28 /EventLoop.hs | |
parent | 76661a5fd22f2c324a2e488f3efa813423a63bf6 (diff) | |
download | metatile-cb73c6714004ffdd256b29f53f9c33b7e5388eb9.tar metatile-cb73c6714004ffdd256b29f53f9c33b7e5388eb9.zip |
make xmonad work with inverted main/config.
darcs-hash:20071018170058-72aca-8018fed9e1c0bc2cf40664b766bb85f678a6a258
Diffstat (limited to 'EventLoop.hs')
-rw-r--r-- | EventLoop.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/EventLoop.hs b/EventLoop.hs index 6490031..c6658db 100644 --- a/EventLoop.hs +++ b/EventLoop.hs @@ -39,7 +39,7 @@ import System.IO -- makeMain :: String -> String -> Layout Window -> [String] -> [(Int,Int,Int,Int)] -> M.Map (ButtonMask,KeySym) (X ()) -> M.Map (ButtonMask, Button) (Window -> X ()) - -> Int -> X () -> IO () + -> Dimension -> X () -> IO () makeMain normalBorderColor focusedBorderColor layoutHook workspaces defaultGaps keys mouseBindings borderWidth logHook = do dpy <- openDisplay "" |