diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-02-20 20:08:53 -0200 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-02-20 20:08:53 -0200 |
commit | 60df6a23b27bc1ff1dfa8f3bdd37c1c4543d980f (patch) | |
tree | 09811a82fdea614f2158d835f4788db2efe968ae | |
parent | 3ff90f54e74d034224d70fe90bc2fc67aae6d8f4 (diff) |
Up and Down arrows when you vote
-rw-r--r-- | sx-question-print.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/sx-question-print.el b/sx-question-print.el index 8ba0157..bd764da 100644 --- a/sx-question-print.el +++ b/sx-question-print.el @@ -219,11 +219,11 @@ DATA can represent a question or an answer." ;; Score and upvoted/downvoted status. (sx-question-mode--insert-header sx-question-mode-header-score - (format "%s" .score) - (cond - ((eq .upvoted t) 'sx-question-mode-score-upvoted) - ((eq .downvoted t) 'sx-question-mode-score-downvoted) - (t 'sx-question-mode-score))) + (format "%s%s" .score + (cond ((eq .upvoted t) "↑") ((eq .downvoted t) "↓") (t ""))) + (cond ((eq .upvoted t) 'sx-question-mode-score-upvoted) + ((eq .downvoted t) 'sx-question-mode-score-downvoted) + (t 'sx-question-mode-score))) ;; Tags (when .title |