ninewise/configuration
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

iasoon got me going again

Browse Source
This commit is contained in:
Felix Van der Jeugt 2015-06-28 15:28:33 +02:00
parent 1d8ef0986e
commit 0d08018fbc
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
xmonad/xmonad.hs
View File

@ -94,7 +94,7 @@ myModMask = mod4Mask
-- > workspaces = ["web", "irc", "code" ] ++ map show [4..9] -- > workspaces = ["web", "irc", "code" ] ++ map show [4..9]
-- --
myWorkspaces :: [[Char]] myWorkspaces :: [[Char]]
myWorkspaces = map show ([1..9]::[Int]) myWorkspaces = (:) "NSP" $ map show ([1..9]::[Int])
-- Border colors for unfocused and focused windows, respectively. -- Border colors for unfocused and focused windows, respectively.
-- --
@ -216,7 +216,7 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
-- mod-shift-[1..9], Move client to workspace N -- mod-shift-[1..9], Move client to workspace N
-- --
[((m .|. modm, k), windows $ f i) [((m .|. modm, k), windows $ f i)
| (i, k) <- zip (XMonad.workspaces conf) [xK_1 .. xK_9] | (i, k) <- zip (XMonad.workspaces conf) [xK_0 .. xK_9]
, (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]] , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]
++ ++