From b0fbbf55772dbe2be6d7e21ff1f2041ce06d73a8 Mon Sep 17 00:00:00 2001 From: gwern0 Date: Wed, 3 Dec 2008 02:33:23 +0100 Subject: XMonad.Prompt: swap up and down per bug #243 Ignore-this: 8ab0481a0da7a983f501ac2fec4a68e8 darcs-hash:20081203013323-f7719-2dc8e5f3d85d0a700628046a6c83af9872789135.gz --- XMonad/Prompt.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'XMonad') 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 -- cgit v1.2.3