forked from colonelpanic/dotfiles
[XMonad] Use nix-flake recompilation support
This commit is contained in:
Submodule dotfiles/config/xmonad/xmonad updated: aa18707c3e...485a0ad506
@@ -110,7 +110,7 @@ myConfig = def
|
|||||||
, handleEventHook
|
, handleEventHook
|
||||||
= followIfNoMagicFocus
|
= followIfNoMagicFocus
|
||||||
<> minimizeEventHook
|
<> minimizeEventHook
|
||||||
<> restartEventHook
|
-- <> restartEventHook
|
||||||
<> myScratchPadEventHook
|
<> myScratchPadEventHook
|
||||||
, startupHook = myStartup
|
, startupHook = myStartup
|
||||||
, keys = customKeys (const []) addKeys
|
, keys = customKeys (const []) addKeys
|
||||||
@@ -137,14 +137,13 @@ restartEventHook _ = return $ All True
|
|||||||
|
|
||||||
myNavigation2DConfig = def { defaultTiledNavigation = centerNavigation }
|
myNavigation2DConfig = def { defaultTiledNavigation = centerNavigation }
|
||||||
|
|
||||||
main = do
|
main =
|
||||||
dirs <- getDirectories
|
xmonad
|
||||||
(`launch` dirs)
|
. docks
|
||||||
. docks
|
. pagerHints
|
||||||
. pagerHints
|
. ewmh
|
||||||
. ewmh
|
. ewmhFullscreen
|
||||||
. ewmhFullscreen
|
. withNavigation2DConfig myNavigation2DConfig $ myConfig
|
||||||
. withNavigation2DConfig myNavigation2DConfig $ myConfig
|
|
||||||
|
|
||||||
-- Utility functions
|
-- Utility functions
|
||||||
|
|
||||||
@@ -316,7 +315,7 @@ instance Transformer MyToggles Window where
|
|||||||
transform AVOIDSTRUTS x k = k (avoidStruts x) unmodifyLayout
|
transform AVOIDSTRUTS x k = k (avoidStruts x) unmodifyLayout
|
||||||
|
|
||||||
myToggles = [LIMIT, GAPS, MAGICFOCUS, MAGNIFY, AVOIDSTRUTS]
|
myToggles = [LIMIT, GAPS, MAGICFOCUS, MAGNIFY, AVOIDSTRUTS]
|
||||||
otherToggles = [NBFULL, MIRROR, NOBORDERS, SMARTBORDERS]
|
otherToggles = [NBFULL, NOBORDERS, MIRROR, SMARTBORDERS]
|
||||||
toggleHandlers =
|
toggleHandlers =
|
||||||
[ (Toggle GAPS, toggleAll)
|
[ (Toggle GAPS, toggleAll)
|
||||||
, (Toggle MAGNIFY, toggleAll)
|
, (Toggle MAGNIFY, toggleAll)
|
||||||
|
Reference in New Issue
Block a user