aboutsummaryrefslogtreecommitdiffstats
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
commit741821c57d74740cf03a1a84318dfb7dd5d2718c (patch)
tree46a155080d2fc52006b2f90860d98a91d6344f28 /EventLoop.hs
parent21ef4511bb9e1d951a518f36e7c41c0f48fbed4c (diff)
downloadxmonad-741821c57d74740cf03a1a84318dfb7dd5d2718c.tar.gz
xmonad-741821c57d74740cf03a1a84318dfb7dd5d2718c.tar.xz
xmonad-741821c57d74740cf03a1a84318dfb7dd5d2718c.zip
make xmonad work with inverted main/config.
darcs-hash:20071018170058-72aca-8018fed9e1c0bc2cf40664b766bb85f678a6a258.gz
Diffstat (limited to '')
-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 ""