From d93d1f15b7b02e7120ca2544b0c40295e6f62a09 Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Mon, 31 Oct 2022 11:08:30 +0100
Subject: toot-mode-hook: profile-fetch-server-account-settings

---
 lisp/mastodon-toot.el | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'lisp')

diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index bcf9c83..9d2d02d 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -76,6 +76,7 @@
 (autoload 'mastodon-toot "mastodon")
 (autoload 'mastodon-profile--get-source-pref "mastodon-profile")
 (autoload 'mastodon-profile--update-preference "mastodon-profile")
+(autoload 'mastodon-profile-fetch-server-account-settings "mastodon-profile")
 (autoload 'mastodon-tl--render-text "mastodon-tl")
 
 ;; for mastodon-toot--translate-toot-text
@@ -1187,6 +1188,9 @@ a draft into the buffer."
     (when initial-text
       (insert initial-text))))
 
+;;;###autoload
+(add-hook 'mastodon-toot-mode-hook #'mastodon-profile-fetch-server-account-settings)
+
 (define-minor-mode mastodon-toot-mode
   "Minor mode to capture Mastodon toots."
   :group 'mastodon-toot
-- 
cgit v1.2.3