summaryrefslogtreecommitdiffstats
path: root/EventLoop.hs
diff options
context:
space:
mode:
authorDavid Roundy <droundy@darcs.net>2007-10-18 19:00:58 +0200
committerDavid Roundy <droundy@darcs.net>2007-10-18 19:00:58 +0200
commitcb73c6714004ffdd256b29f53f9c33b7e5388eb9 (patch)
tree46a155080d2fc52006b2f90860d98a91d6344f28 /EventLoop.hs
parent76661a5fd22f2c324a2e488f3efa813423a63bf6 (diff)
downloadmetatile-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.hs2
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 ""