Update xmonad config

This commit is contained in:
Paul-Henri Froidmont 2022-11-30 01:17:29 +01:00
parent 116bbe96da
commit f2a58fd7e3
Signed by: phfroidmont
GPG key ID: BE948AFD7E7873BE
2 changed files with 9 additions and 9 deletions

View file

@ -1,9 +1,9 @@
Config { Config {
font = "xft:monospace:size=11.5:bold:antialias=true" font = "monospace Bold 12"
additionalFonts= ["xft:monospace:size=14:normal:antialias=true"] additionalFonts= ["monospace Normal 14"]
, bgColor = "#282828" , bgColor = "#282828"
, fgColor = "#ebdbb2" , fgColor = "#ebdbb2"
, position = TopW L 94 , position = TopSize L 94 24
, alpha = 150 , alpha = 150
, commands = [ Run Cpu [ "-t", "<fn=1><fc=#83a598>\xe266</fc></fn> <total>%" , commands = [ Run Cpu [ "-t", "<fn=1><fc=#83a598>\xe266</fc></fn> <total>%"
, "-L", "3","-H","50" , "-L", "3","-H","50"

View file

@ -66,9 +66,9 @@ myConfig xmproc = azertyConfig {
normalBorderColor = "#474646", normalBorderColor = "#474646",
focusedBorderColor = "#83a598", focusedBorderColor = "#83a598",
layoutHook = myLayout, layoutHook = myLayout,
manageHook = manageDocks <+> (isFullscreen --> doFullFloat) <+> manageHook defaultConfig, manageHook = manageDocks <+> (isFullscreen --> doFullFloat) <+> manageHook def,
--handleEventHook = myEventHook <+> handleEventHook defaultConfig, --handleEventHook = myEventHook <+> handleEventHook def,
logHook = (myLogHook xmproc) <+> logHook defaultConfig, logHook = (myLogHook xmproc) <+> logHook def,
--keys = \c -> mkKeymap c myAdditionalKeys, --keys = \c -> mkKeymap c myAdditionalKeys,
startupHook = myStartupHook xmproc startupHook = myStartupHook xmproc
} `removeKeysP` myRemoveKeys `additionalKeysP` myAdditionalKeys } `removeKeysP` myRemoveKeys `additionalKeysP` myAdditionalKeys
@ -77,7 +77,7 @@ myLogHook xmproc = dynamicLogWithPP xmobarPP {
ppOutput = hPutStrLn xmproc, ppOutput = hPutStrLn xmproc,
ppCurrent = xmobarColor "#83a598" "" . wrap "[" "]", -- #9BC1B2 #69DFFA ppCurrent = xmobarColor "#83a598" "" . wrap "[" "]", -- #9BC1B2 #69DFFA
ppTitle = xmobarColor "#d3869b" "" . shorten 100, -- #9BC1B2 #69DFFA ppTitle = xmobarColor "#d3869b" "" . shorten 100, -- #9BC1B2 #69DFFA
ppSort = fmap (.namedScratchpadFilterOutWorkspace) getSortByTag ppSort = fmap (. filterOutWs [scratchpadWorkspaceTag]) getSortByTag
--ppLayout = xmobarColor "#fabd2f" "" . myIcons --ppLayout = xmobarColor "#fabd2f" "" . myIcons
} >> updatePointer (0.75, 0.75) (0.75, 0.75) } >> updatePointer (0.75, 0.75) (0.75, 0.75)
@ -129,10 +129,10 @@ myAdditionalKeys = [
] ]
myLayout = smartSpacing 5 myLayout = smartSpacing 5
$ smartBorders $ smartBorders
$ mkToggle (NOBORDERS ?? FULL ?? EOT) $ mkToggle (NOBORDERS ?? FULL ?? EOT)
$ avoidStruts $ avoidStruts
$ layoutHook defaultConfig $ layoutHook def
myStartupHook xmproc = do myStartupHook xmproc = do
setWMName "LG3D" setWMName "LG3D"