iasoon got me going again
This commit is contained in:
parent
1d8ef0986e
commit
0d08018fbc
@ -94,7 +94,7 @@ myModMask = mod4Mask
|
||||
-- > workspaces = ["web", "irc", "code" ] ++ map show [4..9]
|
||||
--
|
||||
myWorkspaces :: [[Char]]
|
||||
myWorkspaces = map show ([1..9]::[Int])
|
||||
myWorkspaces = (:) "NSP" $ map show ([1..9]::[Int])
|
||||
|
||||
-- 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
|
||||
--
|
||||
[((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)]]
|
||||
++
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user