From 83430ca5d09d551828c2fa3e39b88534d5f6b856 Mon Sep 17 00:00:00 2001 From: Mats Rauhala Date: Tue, 19 Mar 2019 10:34:51 +0200 Subject: [PATCH] Force recompile --- src/XMonad/Config/MasseR.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/XMonad/Config/MasseR.hs b/src/XMonad/Config/MasseR.hs index 2cee510..0e71986 100644 --- a/src/XMonad/Config/MasseR.hs +++ b/src/XMonad/Config/MasseR.hs @@ -165,7 +165,7 @@ myManageHook = composeAll $ concat [ myKeys :: ExtraConfig -> XConfig l -> [((KeyMask, KeySym), NamedAction)] myKeys extraConfig conf = let subKeys str ks = subtitle str : mkNamedKeymap conf ks in - subKeys "Actions" [ ("M-S-r", addName "foo" $ spawn "xmonad --restart") + subKeys "Actions" [ ("M-S-r", addName "foo" (spawn "xmonad --recompile" >> spawn "xmonad --restart")) , ("M-C-l", addName "Lock screen" $ spawn locker)] ^++^ subKeys "System" [ ("", addName "Suspend machine" $ spawn "sudo pm-suspend") , ("", addName "Increase volume" $ spawn "amixer set Master 2%+")