nixos/xmonad: adjust example to reflect v0.17.0 update of xmonad

main
Dominik Xaver Hörl 2 years ago
parent c48b9a8428
commit 34a1ff28e0
  1. 33
      nixos/modules/services/x11/window-managers/xmonad.nix

@ -128,33 +128,34 @@ in {
[ ( (mod4Mask,xK_r), compileRestart True) [ ( (mod4Mask,xK_r), compileRestart True)
, ( (mod4Mask,xK_q), restart "xmonad" True ) ] , ( (mod4Mask,xK_q), restart "xmonad" True ) ]
compileRestart resume = do
dirs <- asks directories
whenX (recompile dirs True) $ do
when resume writeStateToFile
catchIO
( do
args <- getArgs
executeFile (cacheDir dirs </> compiledConfig) False args Nothing
)
main = getDirectories >>= launch myConfig
-------------------------------------------- --------------------------------------------
{- version 0.17.0 -} {- For versions before 0.17.0 use this instead -}
-------------------------------------------- --------------------------------------------
-- compileRestart resume = -- compileRestart resume =
-- dirs <- io getDirectories -- whenX (recompile True) $
-- whenX (recompile dirs True) $
-- when resume writeStateToFile -- when resume writeStateToFile
-- *> catchIO -- *> catchIO
-- ( do -- ( do
-- dir <- getXMonadDataDir
-- args <- getArgs -- args <- getArgs
-- executeFile (cacheDir dirs </> compiledConfig) False args Nothing -- executeFile (dir </> compiledConfig) False args Nothing
-- ) -- )
-- --
-- main = getDirectories >>= launch myConfig -- main = launch myConfig
-------------------------------------------- --------------------------------------------
compileRestart resume =
whenX (recompile True) $
when resume writeStateToFile
*> catchIO
( do
dir <- getXMonadDataDir
args <- getArgs
executeFile (dir </> compiledConfig) False args Nothing
)
main = launch myConfig
''; '';
}; };

Loading…
Cancel
Save