diff options
author | Sean Allred <code@seanallred.com> | 2014-11-12 19:27:57 -0500 |
---|---|---|
committer | Sean Allred <code@seanallred.com> | 2014-11-12 19:27:57 -0500 |
commit | 0a90014486f15138a457f17278e06008e7bda309 (patch) | |
tree | e05587fe742ded2795267caa755130e80fae118e /sx-question-list.el | |
parent | 92d30aeee31c80238a4ce5a825806dadc0e3a065 (diff) | |
parent | ea1a5e0e1ade29688d7db420d564e494dea7974c (diff) |
Merge pull request #40 from vermiculus/new-assoc-let
Fix performance issues with `sx-assoc-let' macro
Diffstat (limited to 'sx-question-list.el')
-rw-r--r-- | sx-question-list.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/sx-question-list.el b/sx-question-list.el index caf24b1..ebd4e97 100644 --- a/sx-question-list.el +++ b/sx-question-list.el @@ -205,26 +205,26 @@ Used in the questions list to indicate a question was updated \"4d ago\"." (list data (vector - (list (int-to-string score) - 'face (if upvoted 'sx-question-list-score-upvoted + (list (int-to-string .score) + 'face (if .upvoted 'sx-question-list-score-upvoted 'sx-question-list-score)) - (list (int-to-string answer_count) - 'face (if (sx-question--accepted-answer data) + (list (int-to-string .answer_count) + 'face (if (sx-question--accepted-answer .data) 'sx-question-list-answers-accepted 'sx-question-list-answers)) (concat (propertize - title - 'face (if (sx-question--read-p data) + .title + 'face (if (sx-question--read-p .data) 'sx-question-list-read-question ;; Increment `sx-question-list--unread-count' for the mode-line. (cl-incf sx-question-list--unread-count) 'sx-question-list-unread-question)) (propertize " " 'display "\n ") - (propertize (concat (sx-time-since last_activity_date) + (propertize (concat (sx-time-since .last_activity_date) sx-question-list-ago-string) 'face 'sx-question-list-date) - (propertize (concat " [" (mapconcat #'identity tags "] [") "]") + (propertize (concat " [" (mapconcat #'identity .tags "] [") "]") 'face 'sx-question-list-tags) (propertize " " 'display "\n")))))) |