diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-12-18 18:17:53 -0200 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-12-22 10:46:41 -0200 |
commit | 2d68b9d7cfb8c483880b83b3008bf2bd0cd41eb0 (patch) | |
tree | 99ce496aa08091ea750be9a0d81963725d0ebf3b | |
parent | 24a98414fcc46f912222a0a84c5ddfd37415e375 (diff) |
Fix score checking
-rw-r--r-- | sx-question-print.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/sx-question-print.el b/sx-question-print.el index 629fd7c..a118a43 100644 --- a/sx-question-print.el +++ b/sx-question-print.el @@ -290,10 +290,11 @@ The comment is indented, filled, and then printed according to (sx--wrap-in-overlay (list 'sx--data-here comment-data) (sx-assoc-let comment-data - (insert - (if (> .score 0) (number-to-string .score) "") - (if (eq .upvoted t) "^" "") - (if (or (> .score 0) .upvoted) " " "") + (when (> .score 0) + (insert (number-to-string .score) + (if (eq .upvoted t) "^" "") + " ")) + (insert (format sx-question-mode-comments-format (sx-question-mode--propertize-display-name .owner) |