diff options
| -rw-r--r-- | XMonad/Prompt.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs index 62d554a..d2ddd53 100644 --- a/XMonad/Prompt.hs +++ b/XMonad/Prompt.hs @@ -379,10 +379,10 @@ keyPressHandle mask (ks,_) | ks == xK_Delete = deleteString Next >> go | ks == xK_Left = moveCursor Prev >> go | ks == xK_Right = moveCursor Next >> go - | ks == xK_Up = moveHistory W.focusUp' >> go - | ks == xK_Down = moveHistory W.focusDown' >> go | ks == xK_Home = startOfLine >> go | ks == xK_End = endOfLine >> go + | ks == xK_Down = moveHistory W.focusUp' >> go + | ks == xK_Up = moveHistory W.focusDown' >> go | ks == xK_Escape = quit where go = updateWindows >> eventLoop handle |