diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-04 18:09:26 -0200 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-04 18:14:26 -0200 |
| commit | df4a8bba9b720357008423b8f91657a8a311607a (patch) | |
| tree | 4bcb790b65160f589b22e7687fcd52538ea4e5fc | |
| parent | 707cb9f97ea9ff6e6f7b135d24a0e2e7b0f99740 (diff) | |
Display user
| -rw-r--r-- | sx-filter.el | 5 | ||||
| -rw-r--r-- | sx-question-list.el | 16 |
2 files changed, 20 insertions, 1 deletions
diff --git a/sx-filter.el b/sx-filter.el index 1cf010f..15bd8a1 100644 --- a/sx-filter.el +++ b/sx-filter.el @@ -117,7 +117,10 @@ return the compiled filter." downvoted question_id share_link) - (user display_name) + (user display_name + reputation) + (shallow_user display_name + reputation) (comment owner body_markdown body diff --git a/sx-question-list.el b/sx-question-list.el index 1342e76..40b72b9 100644 --- a/sx-question-list.el +++ b/sx-question-list.el @@ -109,6 +109,16 @@ "" :group 'sx-question-list-faces) +(defface sx-question-list-reputation + '((t :inherit sx-question-list-date)) + "" + :group 'sx-question-list-faces) + +(defface sx-question-list-user + '((t :inherit font-lock-builtin-face)) + "" + :group 'sx-question-list-faces) + ;;; Backend variables (defvar sx-question-list--print-function #'sx-question-list--print-info @@ -169,6 +179,12 @@ Also see `sx-question-list-refresh'." ;; the whole thing customizable) (propertize (format "%-40s" (mapconcat #'sx-question--tag-format .tags " ")) 'face 'sx-question-list-tags) + " " + (let-alist .owner + (format "%15s %5s" + (propertize .display_name 'face 'sx-question-list-user) + (propertize (number-to-string .reputation) + 'face 'sx-question-list-reputation))) (propertize " " 'display "\n"))))))) (defvar sx-question-list--pages-so-far 0 |