aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-03-22 16:43:14 +0100
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-03-22 16:43:14 +0100
commit35487576acb349e8dc2b407d01d2a394957772dc (patch)
tree873d05061f2f9c237875a0c2e5828d0f881acba9
parente1740a7386a4cef95fb06133a28144aa8160f21c (diff)
make view instance work on user listings
-rw-r--r--lisp/mastodon-views.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el
index d113d44..42bf81d 100644
--- a/lisp/mastodon-views.el
+++ b/lisp/mastodon-views.el
@@ -733,7 +733,12 @@ INSTANCE is an instance domain name."
(mastodon-views--instance-response-fun response brief instance))
(mastodon-tl--do-if-toot
(let* ((toot (if (mastodon-tl--profile-buffer-p)
- (mastodon-tl--property 'profile-json) ; profile may have 0 toots
+ ;; we may be on profile itself:
+ (or (mastodon-tl--property 'profile-json)
+ ;; or on profile account listings, which use toot-json:
+ ;; or just toots:
+ (mastodon-tl--property 'toot-json))
+ ;; normal timeline:
(mastodon-tl--property 'toot-json)))
(reblog (alist-get 'reblog toot))
(account (or (alist-get 'account reblog)