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 let st = XState
{ display = dpy { display = dpy
, xineScreens = xinesc , 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 , theRoot = rootw
, wmdelete = wmdelt , wmdelete = wmdelt
, wmprotocols = wmprot , wmprotocols = wmprot