diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2022-07-23 18:29:28 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2022-07-23 18:29:28 +0200 |
| commit | d0a9ced78111175edb4afb8f45e06d2a496e387d (patch) | |
| tree | 9fef18e7534cebed35974ab114b88a70f88f4b4c | |
| parent | 04d35c7e28b8f50b47f2b86d5c4765f4f091d2a4 (diff) | |
no fave counts for fol-req notifs
| -rw-r--r-- | lisp/mastodon-tl.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 26753a4..cc2f1b8 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -385,8 +385,14 @@ image media from the byline." (or ;; simply praying this order works (alist-get 'status toot) ; notifications timeline + ;; fol-req notif, has 'type + ;; placed before boosts coz fol-reqs have a (useless) reblog entry: + ;; TODO: cd also test for notifs buffer before we do this to be sure + (when (alist-get 'type toot) + toot) (alist-get 'reblog toot) ; boosts toot)) ; everything else + (fol-req-p (equal (alist-get 'type toot-to-count) "follow")) (media-types (mastodon-tl--get-media-types toot)) (format-faves (format "%s faves | %s boosts | %s replies" (alist-get 'favourites_count toot-to-count) @@ -400,7 +406,8 @@ image media from the byline." (member "gifv" media-types)) (require 'mpv nil :no-error)) (format " | C-RET to view with mpv")))) - (format "%s" (concat format-faves format-media format-media-binding)))) + (unless fol-req-p + (format "%s" (concat format-faves format-media format-media-binding))))) (defun mastodon-tl--get-media-types (toot) "Return a list of the media attachment types of the TOOT at point." |