byteio/nixos-config
1
0
Fork 0
mirror of https://github.com/librephoenix/nixos-config synced 2025-01-19 07:05:51 +05:30
Code Issues Packages Projects Releases Wiki Activity

Reorganized some xmonad config stuff

Browse source
This commit is contained in:
Emmet 2023-05-22 20:41:54 -05:00
parent 76923c8f1f
commit 581a5e0cea
2 changed files with 18 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
user/wm/xmonad/xmonad.hs
View file

@ -428,10 +428,6 @@ myNavigation2DConfig = def {layoutNavigation = [("Tall", hybridOf sideNavigation
, floatNavigation = hybridOf lineNavigation centerNavigation
, screenNavigation = hybridOf lineNavigation centerNavigation}
-- Startup hook
myStartupHook = do
spawnOnce ("~/.config/xmonad/startup.sh '" ++ colorBg ++ "' '" ++ colorFg ++ "' '" ++ colorFocus ++ "' '" ++ colorSecondary ++ "'")
--myPP = def { ppCurrent = xmobarColor colorFocus "" }
myPP = xmobarPP { ppTitle = xmobarColor colorFocus "",
ppCurrent = xmobarStripTags ["NSP"] . xmobarColor colorFocus "",
@ -443,6 +439,10 @@ myPP = xmobarPP { ppTitle = xmobarColor colorFocus "",
}
mySB = statusBarProp "xmobar" (pure myPP)
-- Startup hook
myStartupHook = do
spawnOnce ("~/.config/xmonad/startup.sh '" ++ colorBg ++ "' '" ++ colorFg ++ "' '" ++ colorFocus ++ "' '" ++ colorSecondary ++ "'")
-- Now run xmonad with all the defaults we set up.
main = do
spawn ("xmobar -x 0")

28
user/wm/xmonad/xmonad.org
View file

@ -611,6 +611,20 @@ myNavigation2DConfig = def {layoutNavigation = [("Tall", hybridOf sideNavigation
#+END_SRC
*** New Xmobar Setup
#+BEGIN_SRC haskell :tangle xmonad.hs
--myPP = def { ppCurrent = xmobarColor colorFocus "" }
myPP = xmobarPP { ppTitle = xmobarColor colorFocus "",
ppCurrent = xmobarStripTags ["NSP"] . xmobarColor colorFocus "",
ppVisible = xmobarStripTags ["NSP"] . xmobarColor colorSecondary "",
ppHidden = xmobarStripTags ["NSP"] . xmobarColor colorFg "",
ppHiddenNoWindows = xmobarStripTags ["NSP"] . xmobarColor color01 "",
ppOrder = \(ws : _) -> [ws],
ppSep = " "
}
mySB = statusBarProp "xmobar" (pure myPP)
#+END_SRC
*** Startup Script
I have a startup script at =~/.xmonad/startup.sh= which starts various apps and sets up a few things. In my xmonad config, it is autostarted by setting a =startupHook=.
#+BEGIN_SRC haskell :tangle xmonad.hs
@ -667,20 +681,6 @@ protonmail-bridge --no-window
rm -rf ~/org &
gnome-keyring-daemon --daemonize --login &
gnome-keyring-daemon --start --components=secrets &
#+END_SRC
*** New Xmobar Setup
#+BEGIN_SRC haskell :tangle xmonad.hs
--myPP = def { ppCurrent = xmobarColor colorFocus "" }
myPP = xmobarPP { ppTitle = xmobarColor colorFocus "",
ppCurrent = xmobarStripTags ["NSP"] . xmobarColor colorFocus "",
ppVisible = xmobarStripTags ["NSP"] . xmobarColor colorSecondary "",
ppHidden = xmobarStripTags ["NSP"] . xmobarColor colorFg "",
ppHiddenNoWindows = xmobarStripTags ["NSP"] . xmobarColor color01 "",
ppOrder = \(ws : _) -> [ws],
ppSep = " "
}
mySB = statusBarProp "xmobar" (pure myPP)
#+END_SRC
** Main
Lastly, xmonad is started with all of the [[Settings][settings set up as variables]]. First xmobar is setup with =spawnPipe= so that it has access to the [[Workspaces][workspaces from xmonad]]. Then xmonad is executed with the settings.