diff options
author | Trevor Elliott <trevor@galois.com> | 2008-06-06 00:06:56 +0200 |
---|---|---|
committer | Trevor Elliott <trevor@galois.com> | 2008-06-06 00:06:56 +0200 |
commit | f169b3b613e5355e689fcf36dda63457d0d4f02d (patch) | |
tree | 8e7900952528319fb0f5d5470cb2ccb0e02f592b /XMonad/Prompt | |
parent | 11cb0e05d76851697cf1cb67d3a618b7fe6a8221 (diff) | |
download | XMonadContrib-f169b3b613e5355e689fcf36dda63457d0d4f02d.tar.gz XMonadContrib-f169b3b613e5355e689fcf36dda63457d0d4f02d.tar.xz XMonadContrib-f169b3b613e5355e689fcf36dda63457d0d4f02d.zip |
Add C-w to XMonad.Prompt
* Bind C-w to kill the previous word
darcs-hash:20080605220656-5b2f6-4fe83933831415342feacfddb02c78e5c99a04e8.gz
Diffstat (limited to '')
-rw-r--r-- | XMonad/Prompt.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs index c9ae28d..cbcf7a3 100644 --- a/XMonad/Prompt.hs +++ b/XMonad/Prompt.hs @@ -320,6 +320,7 @@ keyPressHandle mask (ks,_) | ks == xK_Left -> moveWord Prev >> go | ks == xK_Delete -> killWord Next >> go | ks == xK_BackSpace -> killWord Prev >> go + | ks == xK_w -> killWord Prev >> go | ks == xK_g || ks == xK_c -> quit | otherwise -> eventLoop handle -- unhandled control sequence | ks == xK_Return = historyPush >> return () |