aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Main.hs b/Main.hs
index 1b7dc92..05cb69d 100644
--- a/Main.hs
+++ b/Main.hs
@@ -43,7 +43,7 @@ main = do
let st = XState
{ display = dpy
, xineScreens = xinesc
- , wsOnScreen = M.fromList $ map (\n -> (n,n)) [0..((length xinesc)-1)]
+ , wsOnScreen = M.fromList $ map (\n -> (n,n)) [0.. length xinesc - 1]
, theRoot = rootw
, wmdelete = wmdelt
, wmprotocols = wmprot