From da3761c4919a4a3268b52ffb05331aaca304831c Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Tue, 25 Mar 2008 10:15:26 +0100
Subject: Remove gaps

darcs-hash:20080325091526-a5988-e6ed58b0d493845525a4c7e5977352cfb12b9c92
---
 XMonad/Main.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'XMonad/Main.hs')

diff --git a/XMonad/Main.hs b/XMonad/Main.hs
index 3840c53..ab276af 100644
--- a/XMonad/Main.hs
+++ b/XMonad/Main.hs
@@ -64,7 +64,7 @@ xmonad initxmc = do
 
     let layout = layoutHook xmc
         lreads = readsLayout layout
-        initialWinset = new layout (workspaces xmc) $ zipWith SD xinesc gaps
+        initialWinset = new layout (workspaces xmc) $ map SD xinesc
 
         maybeRead reads' s = case reads' s of
                                 [(x, "")] -> Just x
@@ -76,8 +76,6 @@ xmonad initxmc = do
                     return . W.ensureTags layout (workspaces xmc)
                            $ W.mapLayout (fromMaybe layout . maybeRead lreads) ws
 
-        gaps = take (length xinesc) $ defaultGaps xmc ++ repeat (0,0,0,0)
-
         cf = XConf
             { display       = dpy
             , config        = xmc
-- 
cgit v1.2.3