summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2015-07-15 22:38:01 +0200
committerGregor Kleen <gkleen@yggdrasil.li>2015-07-15 22:38:01 +0200
commit00bf13197996c7db9cc7bee07e423bef75ffdb93 (patch)
treecab4be80dbce5c70056ccfb334a6ffdc010b773c
parenta4f614f137f07891faa66177366957348e20548a (diff)
downloaddotfiles-00bf13197996c7db9cc7bee07e423bef75ffdb93.tar
dotfiles-00bf13197996c7db9cc7bee07e423bef75ffdb93.tar.gz
dotfiles-00bf13197996c7db9cc7bee07e423bef75ffdb93.tar.bz2
dotfiles-00bf13197996c7db9cc7bee07e423bef75ffdb93.tar.xz
dotfiles-00bf13197996c7db9cc7bee07e423bef75ffdb93.zip
Tweaked list ranges for syntax
-rw-r--r--.xmonad/xmonad.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index 903eff4..c172147 100644
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -66,7 +66,7 @@ defaultHost = Host { hName = "unkown"
66 , hWsp = show 66 , hWsp = show
67 , hCoWsp = const Nothing 67 , hCoWsp = const Nothing
68 , hKeysMod = const id 68 , hKeysMod = const id
69 , hScreens = [0..] 69 , hScreens = [0,1..]
70 } 70 }
71 71
72hostFromName :: HostName -> Host 72hostFromName :: HostName -> Host
@@ -79,7 +79,7 @@ hostFromName h@("vali") = defaultHost { hName = h
79 , hCoWsp = hCoWsp 79 , hCoWsp = hCoWsp
80 , hKeysMod = \conf -> Map.union $ Map.fromList $ join $ map (spawnBindings conf) [ (xK_d, ["dwb", "dwb $(xclip -o)"]) 80 , hKeysMod = \conf -> Map.union $ Map.fromList $ join $ map (spawnBindings conf) [ (xK_d, ["dwb", "dwb $(xclip -o)"])
81 ] 81 ]
82 , hScreens = [1, 0, 2..] 82 , hScreens = [1, 0] ++ [2,3..]
83 } 83 }
84 where 84 where
85 workspaceNames = Map.fromList [ (2, "web") 85 workspaceNames = Map.fromList [ (2, "web")