From 3d6089a6f96b832cb88ccb7bea9be5e1a566d15d Mon Sep 17 00:00:00 2001
From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Tue, 9 Dec 2014 15:42:35 +0000
Subject: Define up and down keys on the list.

---
 sx-question-list.el | 9 +++++++--
 1 file 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.
-- 
cgit v1.2.3