aboutsummaryrefslogtreecommitdiff
path: root/sx-question-mode.el
diff options
context:
space:
mode:
authorSean Allred <code@seanallred.com>2014-12-03 17:55:52 -0500
committerSean Allred <code@seanallred.com>2014-12-03 17:55:52 -0500
commit67b60ea558f0386a1ea3dadcf3a9c4d22d398620 (patch)
tree8695418c51779333101b45aad180e6979a6e2ad0 /sx-question-mode.el
parent48314a1227cca288731a48a7f07558654a953d9d (diff)
parent90d3a20ee3ac0a98e8d26cd9cf203e113acdbdce (diff)
Merge pull request #129 from vermiculus/answering
Implement asking, answering, and editing.
Diffstat (limited to 'sx-question-mode.el')
-rw-r--r--sx-question-mode.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/sx-question-mode.el b/sx-question-mode.el
index 91044ff..bccb658 100644
--- a/sx-question-mode.el
+++ b/sx-question-mode.el
@@ -124,7 +124,7 @@ Prefix argument N moves N sections down or up."
(cl-decf count)))))
(when (equal (selected-window) (get-buffer-window))
(when sx-question-mode-recenter-line
- (let ((ov (car-safe (sx-question-mode--section-overlays-at (line-end-position)))))
+ (let ((ov (sx-question-mode--section-overlays-at (line-end-position))))
(when (and (overlayp ov) (> (overlay-end ov) (window-end)))
(recenter sx-question-mode-recenter-line))))
(sx-message-help-echo)))
@@ -202,6 +202,8 @@ Letters do not insert themselves; instead, they are commands.
("d" sx-toggle-downvote)
("q" quit-window)
(" " scroll-up-command)
+ ("a" sx-answer)
+ ("e" sx-edit)
(,(kbd "S-SPC") scroll-down-command)
([backspace] scroll-down-command)
([tab] forward-button)