diff options
| -rw-r--r-- | lisp/mastodon-tl.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 7139761..6358c72 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -108,6 +108,9 @@ (defun mastodon-tl--byline (toot) (let ((id (cdr (assoc 'id toot))) + (faved (or (cdr (assoc 'favourited toot)) + (cdr (assoc 'favourited + (cdr (assoc 'reblog toot)))))) (boosted (or (cdr (assoc 'reblogged toot)) (cdr (assoc 'reblogged (cdr (assoc 'reblog toot))))))) @@ -115,6 +118,8 @@ (concat (propertize "\n | " 'face 'default) (when boosted (format "(%s) " (propertize "B" 'face 'success))) + (when faved + (format "(%s) " (propertize "F" 'face 'success))) (mastodon-tl--byline-author toot) (mastodon-tl--byline-boosted toot) (propertize "\n ------------" 'face 'default)) |