diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-12-09 15:42:35 +0000 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-12-09 15:42:35 +0000 |
| commit | 3d6089a6f96b832cb88ccb7bea9be5e1a566d15d (patch) | |
| tree | b359a24d0ecc85c60bc2f255fae48f2b52ca7295 /sx-question-list.el | |
| parent | a983476a59701f1cc01580b16fc5235360054adf (diff) | |
Define up and down keys on the list.
Diffstat (limited to 'sx-question-list.el')
| -rw-r--r-- | sx-question-list.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/sx-question-list.el b/sx-question-list.el index c5c32d9..788fc2f 100644 --- a/sx-question-list.el +++ b/sx-question-list.el @@ -286,7 +286,11 @@ into consideration. (mapc (lambda (x) (define-key sx-question-list-mode-map (car x) (cadr x))) - '(("n" sx-question-list-next) + '( + ;; S-down and S-up would collide with `windmove'. + ([down] sx-question-list-view-next) + ([up] sx-question-list-view-previous) + ("n" sx-question-list-next) ("p" sx-question-list-previous) ("j" sx-question-list-view-next) ("k" sx-question-list-view-previous) @@ -303,7 +307,8 @@ into consideration. ("d" sx-toggle-downvote) ("h" sx-question-list-hide) ("m" sx-question-list-mark-read) - ([?\r] sx-display-question))) + ([?\r] sx-display-question) + )) (defun sx-question-list-hide (data) "Hide question under point. |