Updated Xmonad look

This commit is contained in:
Afonso Franco 2023-09-18 16:03:15 +01:00
parent bbe4eda1d2
commit 912b77c295
Signed by: afonso
SSH key fingerprint: SHA256:JiuxZNdA5bRWXPMUJChI0AQ75yC+cXY4xM0IaVwEVys
8 changed files with 231 additions and 23 deletions

View file

@ -164,15 +164,12 @@ myStartupHook = do
spawnOnce "nitrogen --restore &"
spawnOnce "playerctld"
spawnOnce "picom &"
spawnOnce "optimus-manager-qt"
setWMName "LG3D"
spawnOnce "nm-applet"
spawnOnce "mailspring"
spawnOnce("xsetroot -cursor_name left_ptr")
spawn ("killall trayer ;sleep 1 && trayer --monitor 0 --edge top --align right --widthtype request --padding 7 --iconspacing 12 --SetDockType true --SetPartialStrut true --expand true --transparent true --alpha 0 --tint 0x2B2E37 --height 26 --distance 5 &")
spawnOn "web" myWebBrowser
spawnOn "main" myTerminalTmux
spawnOn "monitoring" (myTerminal ++ " -e btop")
spawnOnce ("killall trayer ;sleep 1 && trayer --monitor 0 --edge top --align right --margin 4 --widthtype request --padding 8 --iconspacing 12 --SetDockType true --SetPartialStrut true --expand true --transparent true --alpha 0 --tint 0x2B2E37 --height 30 --distance 5 &")
spawnOnOnce "web" myWebBrowser
spawnOnOnce "main" myTerminalTmux
@end
* XMobar Config
@code haskell
@ -223,7 +220,7 @@ myConfig = def
workspaces = myWorkspaces,
normalBorderColor = myNormalBorderColor,
focusedBorderColor = myFocusedBorderColor,
layoutHook = smartBorders . spacingWithEdge 5 $ myLayout,
layoutHook = smartBorders . spacingWithEdge 15 $ myLayout,
manageHook = manageSpawn <+> myManageHook <+> manageHook def,
handleEventHook = myEventHook <+> fullscreenEventHook <+> swallowEventHook (className=?"Alacritty") (return True),
startupHook = myStartupHook