diff options
| author | sean.escriva <sean.escriva@gmail.com> | 2009-04-09 18:26:09 +0200 |
|---|---|---|
| committer | sean.escriva <sean.escriva@gmail.com> | 2009-04-09 18:26:09 +0200 |
| commit | 3e98a92b8294fcead841795fc43201423eb3af9f (patch) | |
| tree | 95d0c5144b03cdd5045b77a4b2786f1c63e49ed1 | |
| parent | d6cd263c475ac0d2243d69268e6d246ba4728ac0 (diff) | |
| download | XMonadContrib-3e98a92b8294fcead841795fc43201423eb3af9f.tar.gz XMonadContrib-3e98a92b8294fcead841795fc43201423eb3af9f.tar.xz XMonadContrib-3e98a92b8294fcead841795fc43201423eb3af9f.zip | |
Prompt.hs: setSuccess True also on Keypad Enter
Ignore-this: cf04f87c546f89bd32a94de3a2a93b22
darcs-hash:20090409162609-29414-71dc93f7918450168f648cfe384185361faa9768.gz
Diffstat (limited to '')
| -rw-r--r-- | XMonad/Prompt.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs index 1a0edb3..c91fe64 100644 --- a/XMonad/Prompt.hs +++ b/XMonad/Prompt.hs @@ -378,7 +378,7 @@ keyPressHandle mask (ks,_) | ks == xK_w -> killWord Prev >> go | ks == xK_g || ks == xK_c -> quit | otherwise -> eventLoop handle -- unhandled control sequence - | ks == xK_Return = setSuccess True + | ks == xK_Return || ks == xK_KP_Enter = setSuccess True | ks == xK_BackSpace = deleteString Prev >> go | ks == xK_Delete = deleteString Next >> go | ks == xK_Left = moveCursor Prev >> go |