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-18 18:17:53 -0200 |
commit | 3be41a8af1f98abfc8b2a43ce09c08586bee1075 (patch) | |
tree | dbf5971489e5e70ceb404bfb2cc5513405fe983e | |
parent | 34753b9cb10beaa529f9f56cbc5bea3d11960ea3 (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 6131684..d0802d6 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) |