aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-profile.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-09-21 16:20:14 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-09-21 16:20:14 +0200
commit0798cf6822733929d571973d2189377ef0a9f849 (patch)
treed3a123ec95bd8c14271101493ecee4ec6329ecc2 /lisp/mastodon-profile.el
parent020c8efaa235e67aaa07284beae84dd9134fbc90 (diff)
handle empty relationships vector in make-buffer-for
can be empty when doing url-lookup on a mention
Diffstat (limited to 'lisp/mastodon-profile.el')
-rw-r--r--lisp/mastodon-profile.el10
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index ff729f0..054f6e5 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -461,10 +461,12 @@ Returns an alist."
(mastodon-profile--account-field
account 'statuses_count)))
(relationships (mastodon-profile--relationships-get id))
- (followed-by-you (alist-get 'following
- (aref relationships 0)))
- (follows-you (alist-get 'followed_by
- (aref relationships 0)))
+ (followed-by-you (when (not (seq-empty-p relationships))
+ (alist-get 'following
+ (aref relationships 0))))
+ (follows-you (when (not (seq-empty-p relationships))
+ (alist-get 'followed_by
+ (aref relationships 0))))
(followsp (or (equal follows-you 't) (equal followed-by-you 't)))
(fields (mastodon-profile--fields-get account))
(pinned (mastodon-profile--get-statuses-pinned account)))