MasseR/xmonad-masser
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Force recompile

Browse Source
This commit is contained in:
Mats Rauhala
2019-03-19 11:02:08 +02:00
parent 61711bc287
commit a22b1b36e2
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/XMonad/Config/MasseR.hs
View File

@@ -165,7 +165,7 @@ myManageHook = composeAll $ concat [
myKeys :: ExtraConfig -> XConfig l -> [((KeyMask, KeySym), NamedAction)] myKeys :: ExtraConfig -> XConfig l -> [((KeyMask, KeySym), NamedAction)]
myKeys extraConfig conf = myKeys extraConfig conf =
let subKeys str ks = subtitle str : mkNamedKeymap conf ks in let subKeys str ks = subtitle str : mkNamedKeymap conf ks in
subKeys "Actions" [ ("M-S-r", addName "foobar" (spawn "xmonad --recompile" >> spawn "xmonad --restart")) subKeys "Actions" [ ("M-S-r", addName "foobar" (recompile True >> spawn "xmonad --restart"))
, ("M-C-l", addName "Lock screen" $ spawn locker)] ^++^ , ("M-C-l", addName "Lock screen" $ spawn locker)] ^++^
subKeys "System" [ ("<XF86Sleep>", addName "Suspend machine" $ spawn "sudo pm-suspend") subKeys "System" [ ("<XF86Sleep>", addName "Suspend machine" $ spawn "sudo pm-suspend")
, ("<XF86AudioRaiseVolume>", addName "Increase volume" $ spawn "amixer set Master 2%+") , ("<XF86AudioRaiseVolume>", addName "Increase volume" $ spawn "amixer set Master 2%+")