branch: elpa/mastodon
commit 9a7856544a28b144be3cfd358a4da9b2b86308a5
Merge: 0461c080c3 0c5c81e56e
Author: marty hiatt <martianhia...@disroot.org>
Commit: marty hiatt <martianhia...@disroot.org>

    Merge branch 'blocked-by' into develop
---
 lisp/mastodon-profile.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index 8852806d91..d5376f7c38 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -731,7 +731,7 @@ MAX-ID is a flag to include the max_id pagination 
parameter."
                  ;; or poss it has a different endpoint
                  ""
                (let* ((followsp (mastodon-profile--follows-p
-                                 (list .requested_by .following .followed_by)))
+                                 (list .requested_by .following .followed_by 
.blocked_by)))
                       (rels (mastodon-profile--relationships-get .id))
                       (langs-filtered (if-let* ((langs (alist-get 'languages 
rels)))
                                           (concat " ("
@@ -746,6 +746,8 @@ MAX-ID is a flag to include the max_id pagination 
parameter."
                                 " | FOLLOWS YOU")
                               (when (eq .requested_by t)
                                 " | REQUESTED TO FOLLOW YOU")
+                              (when (eq .blocked_by t)
+                                " | BLOCKS YOU")
                               "\n\n")
                       'success)
                    ""))))) ; for insert call

Reply via email to