colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[XMonad] Use nix-flake recompilation support

Browse Source
This commit is contained in:
Ivan Malison 2021-09-11 18:24:56 -06:00
parent 3d894ba205
commit b0b03881e9
2 changed files with 10 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dotfiles/config/xmonad/xmonad

@ -1 +1 @@
Subproject commit aa18707c3ef96db88208509c2a18c6670e831661
Subproject commit 485a0ad506b8fb4a93a01a7cdd437121ecf5e40c

19
dotfiles/config/xmonad/xmonad.hs
View File

@ -110,7 +110,7 @@ myConfig = def
, handleEventHook
= followIfNoMagicFocus
<> minimizeEventHook
<> restartEventHook
-- <> restartEventHook
<> myScratchPadEventHook
, startupHook = myStartup
, keys = customKeys (const []) addKeys
@ -137,14 +137,13 @@ restartEventHook _ = return $ All True
myNavigation2DConfig = def { defaultTiledNavigation = centerNavigation }
main = do
dirs <- getDirectories
(`launch` dirs)
. docks
. pagerHints
. ewmh
. ewmhFullscreen
. withNavigation2DConfig myNavigation2DConfig $ myConfig
main =
xmonad
. docks
. pagerHints
. ewmh
. ewmhFullscreen
. withNavigation2DConfig myNavigation2DConfig $ myConfig
-- Utility functions
@ -316,7 +315,7 @@ instance Transformer MyToggles Window where
transform AVOIDSTRUTS x k = k (avoidStruts x) unmodifyLayout
myToggles = [LIMIT, GAPS, MAGICFOCUS, MAGNIFY, AVOIDSTRUTS]
otherToggles = [NBFULL, MIRROR, NOBORDERS, SMARTBORDERS]
otherToggles = [NBFULL, NOBORDERS, MIRROR, SMARTBORDERS]
toggleHandlers =
[ (Toggle GAPS, toggleAll)
, (Toggle MAGNIFY, toggleAll)