laptop xmonad config setup

This commit is contained in:
Solomon Laing 2021-08-29 15:20:28 +09:30
parent dfaddd9546
commit 3eb9ed3e86

View File

@ -381,6 +381,7 @@ myLogHook = fadeInactiveLogHook fadeAmount
-- By default, do nothing.
myStartupHook = do
-- Startup apps (tray) and settings
spawnOnce "powerkit"
spawnOnce "volctl &"
spawnOnce "nm-applet &"
spawnOnce "blueman-applet &"
@ -403,16 +404,6 @@ myStartupHook = do
-- Run xmonad with the settings you specify. No need to modify this.
main :: IO ()
main = do
-- need to learn more haskell but I want to do something like the following
-- need this because I share configs over computers
-- let toProc = ""
-- let host = spawnOnce "cat /etc/hostname"
-- if host isSubsequenceOf "archdesktop"
-- then let toProc = "xmobar -x 0 /home/solomon/.config/xmobar/xmobarrc-desktop.hs"
-- else let toProc = "xmobar -x 0 /home/solomon/.config/xmobar/xmobarrc-laptop.hs"
-- xmproc0 <- spawnPipe toProc
xmproc0 <- spawnPipe "xmobar -x 0 /home/solomon/.config/xmobar/xmobarrc-main.hs"
xmonad $ ewmh $ docks def