diff options
| author | mousebot <mousebot@riseup.net> | 2022-02-15 17:04:35 +0100 |
|---|---|---|
| committer | mousebot <mousebot@riseup.net> | 2022-02-15 19:38:15 +0100 |
| commit | b2302027969ec305969c4024296b05f50e4f1846 (patch) | |
| tree | 7398e10e9e4f612e452d96eb3fbf665f4a08cdf9 /lisp | |
| parent | b26b4f835aee9317c13e98922342994e26a54078 (diff) | |
make profile--extract-user-handles compat with foll req view
this allows following users directly from foll req views
made extract-users-handles work with follwers/following in profile view
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mastodon-profile.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index f779648..857c349 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -454,7 +454,12 @@ If the handle does not match a search return then retun NIL." These include the author, author of reblogged entries and any user mentioned." (when status - (let ((this-account (alist-get 'account status)) + (let ((this-account + ;; follow suggestions view compat: + (if (or (equal (buffer-name) "*mastodon-follow-suggestions*") + (string-prefix-p "accounts" (mastodon-tl--get-endpoint))) + (mastodon-tl--property 'toot-json) + (alist-get 'account status))) (mentions (alist-get 'mentions status)) (reblog (alist-get 'reblog status))) (seq-filter |