FIX make ctl-g exit power prompt

2020-03-16 19:36:12 -04:00 · 2020-03-16 19:36:12 -04:00 · 668d7e232f
parent c7d7a12ca1
commit 668d7e232f
1 changed files with 1 additions and 1 deletions
--- a/bin/xmonad.hs
+++ b/bin/xmonad.hs
@ -255,7 +255,7 @@ myPowerPrompt = mkXPrompt PowerPrompt theme comp executeAction
    comp = mkComplFunFromList []
    theme = T.promptTheme { promptKeymap = keymap }
    keymap = M.fromList
-      $ ((0, xK_g), quit) :
+      $ ((controlMask, xK_g), quit) :
      map (first $ (,) 0)
      [ (xK_p, sendAction "p")
      , (xK_s, sendAction "s")