diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2008-03-25 10:15:26 +0100 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2008-03-25 10:15:26 +0100 |
commit | 8fc2edf1a9a2f60442031776a22d1b77d1a44936 (patch) | |
tree | 5f72beed4d71df149799772781bc5cb4aae92a8b /XMonad/Main.hs | |
parent | 97774dfa7315b9e3b9786c2a4e282f43eb192e99 (diff) | |
download | xmonad-8fc2edf1a9a2f60442031776a22d1b77d1a44936.tar.gz xmonad-8fc2edf1a9a2f60442031776a22d1b77d1a44936.tar.xz xmonad-8fc2edf1a9a2f60442031776a22d1b77d1a44936.zip |
Remove gaps
darcs-hash:20080325091526-a5988-e6ed58b0d493845525a4c7e5977352cfb12b9c92.gz
Diffstat (limited to '')
-rw-r--r-- | XMonad/Main.hs | 4 |
1 files changed, 1 insertions, 3 deletions
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 |