Updated Xmonad look
This commit is contained in:
parent
bbe4eda1d2
commit
912b77c295
8 changed files with 231 additions and 23 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue