Auto Tangle, Whitespace Fixes, & Xmobar Config Changes
- Auto tangle xmonad & xmobar config - Replace ` with ~ for code formatted text - Put code example inside an example block - Change workspaces back to default numbers - Fix leading whitespace in org document - Initial xmobar config changes
This commit is contained in:
@@ -26,12 +26,11 @@ myBorderWidth = 2
|
||||
myNormalBorderColor = "#4D4D4D"
|
||||
myFocusedBorderColor = "#BD93F9"
|
||||
|
||||
myWorkspaces = ["\f868\2081", "2", "3", "4", "5", "6", "7", "8", "9"]
|
||||
myWorkspaces = ["1", "2", "3", "4", "5", "6", "7", "8", "9"]
|
||||
|
||||
myModMask = mod4Mask
|
||||
|
||||
myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
|
||||
|
||||
-- launch a terminal
|
||||
[ ((modm .|. shiftMask, xK_Return), spawn $ XMonad.terminal conf)
|
||||
|
||||
@@ -106,19 +105,15 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
|
||||
]
|
||||
++
|
||||
|
||||
--
|
||||
-- mod-[1..9], Switch to workspace N
|
||||
-- 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]
|
||||
, (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]
|
||||
++
|
||||
|
||||
--
|
||||
-- mod-{w,e,r}, Switch to physical/Xinerama screens 1, 2, or 3
|
||||
-- mod-shift-{w,e,r}, Move client to screen 1, 2, or 3
|
||||
--
|
||||
[((m .|. modm, key), screenWorkspace sc >>= flip whenJust (windows . f))
|
||||
| (key, sc) <- zip [xK_w, xK_e, xK_r] [0..]
|
||||
, (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
|
||||
|
Reference in New Issue
Block a user