Remove redundant parens

This commit is contained in:
Spencer Janssen 2007-04-09 07:38:36 +00:00
parent a99841e554
commit 71b897b595

View File

@ -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