echo faves, boosts, replies counts when in thread view

1 files changed, 8 insertions, 0 deletions

diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index a7767b8..b4e3ae2 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -721,6 +721,14 @@ takes a single function. By default it is
               (mastodon-tl--byline toot author-byline action-byline))
       'toot-id      (cdr (assoc 'id toot))
       'base-toot-id (mastodon-tl--toot-id toot)
+      'help-echo    (when (and mastodon-tl--buffer-spec
+                               (string-match-p
+                                "context"
+                                (plist-get mastodon-tl--buffer-spec 'endpoint)))
+                      (format "%s faves | %s boosts | %s replies"
+                              (cdr (assoc 'favourites_count toot))
+                              (cdr (assoc 'reblogs_count toot))
+                              (cdr (assoc 'replies_count toot))))
       'toot-json    toot)
      "\n")
     (when mastodon-tl--display-media-p