From e08863e6fbd07c53937ec4106ddb4d4716ca7976 Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Sat, 3 Sep 2022 14:51:22 +0200
Subject: url-lookup: fix loading profile fun: just use the search JSON

---
 lisp/mastodon.el | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index 13a410b..2dc075a 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -295,9 +295,8 @@ not, just browse the URL in the normal fashion."
                 ((not (seq-empty-p
                        (alist-get 'accounts response)))
                  (let* ((accounts (assoc 'accounts response))
-                        (account (seq-first (cdr accounts)))
-                        (account-acct (alist-get 'acct account)))
-                   (mastodon-profile--show-user account-acct)))
+                        (account (seq-first (cdr accounts))))
+                        (mastodon-profile--make-author-buffer account)))
                 (t
                  (browse-url query))))))))
 
-- 
cgit v1.2.3