|
|
|
|
|
|
21
|
|
21
|
|
|
22
|
main = do
|
22
|
main = do
|
|
23
|
kbMap <- newIORef "us"
|
23
|
kbMap <- newIORef "us"
|
|
24
|
xmobar <- spawnPipe "xmobar"
|
|
|
|
25
|
xmonad $ defaultConfig {
|
24
|
xmonad $ defaultConfig {
|
|
26
|
modMask = mod4Mask,
|
25
|
modMask = mod4Mask,
|
|
27
|
terminal = "urxvt",
|
26
|
terminal = "urxvt",
|
|
|
|
|
|
|
34
|
] <+> manageHook defaultConfig,
|
33
|
] <+> manageHook defaultConfig,
|
|
35
|
-- Don't overwrite the section used by docks
|
34
|
-- Don't overwrite the section used by docks
|
|
36
|
layoutHook = avoidStruts $ layoutHook defaultConfig ||| simpleTabbed,
|
35
|
layoutHook = avoidStruts $ layoutHook defaultConfig ||| simpleTabbed,
|
|
37
|
logHook = dynamicLogWithPP xmobarPP {
|
|
|
|
38
|
ppOutput = hPutStrLn xmobar,
|
|
|
|
39
|
ppTitle = xmobarColor "green" ""
|
|
|
|
40
|
},
|
|
|
|
41
|
handleEventHook = evHook
|
36
|
handleEventHook = evHook
|
|
42
|
} `additionalKeys` [
|
37
|
} `additionalKeys` [
|
|
43
|
((mod4Mask, xK_b), spawnHere "chromium --allow-file-access-from-files"),
|
38
|
((mod4Mask, xK_b), spawnHere "chromium --allow-file-access-from-files"),
|