From 3506668a6ab9449816c46f827f249ebd2a5d8ac9 Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Sun, 15 Jan 2023 08:18:55 +0100
Subject: fix set buffer-spec for instance-description

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

(limited to 'lisp/mastodon-tl.el')

diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index a240f67..31ef328 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -2240,9 +2240,6 @@ INSTANCE is an instance domain name."
        (let ((buf (get-buffer-create "*mastodon-instance*")))
          (with-current-buffer buf
            (switch-to-buffer-other-window buf)
-           (mastodon-tl--set-buffer-spec (buffer-name buf)
-                                         "instance"
-                                         nil)
            (let ((inhibit-read-only t))
              (erase-buffer)
              (special-mode)
@@ -2260,6 +2257,9 @@ INSTANCE is an instance domain name."
                            (assoc 'stats response))))
              (mastodon-tl--print-json-keys response)
              (mastodon-mode)
+             (mastodon-tl--set-buffer-spec (buffer-name buf)
+                                           "instance"
+                                           nil)
              (goto-char (point-min)))))))))
 
 (defun mastodon-tl--format-key (el pad)
-- 
cgit v1.2.3