aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAlec Berryman <alec@thened.net>2007-04-01 16:42:29 +0200
committerAlec Berryman <alec@thened.net>2007-04-01 16:42:29 +0200
commit2c36009622e993d2944f999bd2720cffabe6f6e6 (patch)
tree2697a7a000a13d73078bfca8cb4c3f967ce69107
parentd47a26b803c9110842bd4a0d248fc98b96c08b70 (diff)
downloadxmonad-2c36009622e993d2944f999bd2720cffabe6f6e6.tar.gz
xmonad-2c36009622e993d2944f999bd2720cffabe6f6e6.tar.xz
xmonad-2c36009622e993d2944f999bd2720cffabe6f6e6.zip
Fix type error in dimensions field of XState record for 64-bit systems
Fallout from Int->CInt conversion. darcs-hash:20070401144229-39448-a124d5c3906bbc527e04ef041d9321d871fc93b3.gz
-rw-r--r--Main.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/Main.hs b/Main.hs
index d571f96..363ed72 100644
--- a/Main.hs
+++ b/Main.hs
@@ -48,7 +48,9 @@ main = do
, theRoot = rootw
, wmdelete = wmdelt
, wmprotocols = wmprot
- , dimensions = (displayWidth dpy dflt, displayHeight dpy dflt)
+ -- fromIntegral needed for X11 versions that use Int instead of CInt.
+ , dimensions = (fromIntegral (displayWidth dpy dflt),
+ fromIntegral (displayHeight dpy dflt))
, workspace = W.empty workspaces
, layoutDescs = M.empty
, dispositions = M.empty