inkletblot/config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

laptop xmonad config setup

Browse Source
This commit is contained in:
Solomon Laing 2021-08-29 15:20:28 +09:30
parent dfaddd9546
commit 3eb9ed3e86
1 changed files with 1 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
.xmonad/xmonad.hs
View File

@ -381,6 +381,7 @@ myLogHook = fadeInactiveLogHook fadeAmount
-- By default, do nothing. -- By default, do nothing.
myStartupHook = do myStartupHook = do
-- Startup apps (tray) and settings -- Startup apps (tray) and settings
spawnOnce "powerkit"
spawnOnce "volctl &" spawnOnce "volctl &"
spawnOnce "nm-applet &" spawnOnce "nm-applet &"
spawnOnce "blueman-applet &" spawnOnce "blueman-applet &"
@ -403,16 +404,6 @@ myStartupHook = do
-- Run xmonad with the settings you specify. No need to modify this. -- Run xmonad with the settings you specify. No need to modify this.
main :: IO () main :: IO ()
main = do 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" xmproc0 <- spawnPipe "xmobar -x 0 /home/solomon/.config/xmobar/xmobarrc-main.hs"
xmonad $ ewmh $ docks def xmonad $ ewmh $ docks def