diff options
author | azahi <azahi@teknik.io> | 2018-10-15 22:01:39 +0300 |
---|---|---|
committer | azahi <azahi@teknik.io> | 2018-10-15 22:01:39 +0300 |
commit | 830a7d1387aeb404cb5312a84739960946478bac (patch) | |
tree | 89565d389117dd66bf13c0fe3affb484df6467c6 /src/XMonad/Custom/Bindings.hs | |
parent | Allow building via `xmonad --recompile` (diff) |
Modify keybindings
Fix music player scratchpad Add abilities to recompile and restart from the running xmonad session
Diffstat (limited to '')
-rw-r--r-- | src/XMonad/Custom/Bindings.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/XMonad/Custom/Bindings.hs b/src/XMonad/Custom/Bindings.hs index b31599a..9400de7 100644 --- a/src/XMonad/Custom/Bindings.hs +++ b/src/XMonad/Custom/Bindings.hs @@ -122,8 +122,8 @@ rawKeys c = withUpdatePointer $ concatMap ($ c) keymaps where keysBase :: XConfig Layout -> [(String, X ())] keysBase _ = [ ("M-S-q" , confirmPrompt hotPromptTheme "Quit XMonad?" $ io exitSuccess) - -- [ ("M-q" $ spawn "xmonad-ng --restart") - -- , ("M-C-q" $ spawn "xmonad-ng --recompile && xmonad-ng --restart"') + , ("M-q" , spawn "xmonad --restart") + , ("M-C-q" , spawn "xmonad --recompile && xmonad --restart") , ("M-x" , shellPrompt promptTheme) , ("M-w" , windowPrompt promptTheme Goto allWindows) , ("M-S-w" , windowPrompt promptTheme Bring allWindows) |