diff options
author | marty hiatt <martianhiatus@riseup.net> | 2024-05-28 20:38:19 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus@riseup.net> | 2024-05-28 20:39:13 +0200 |
commit | c688fd0b6eaa02b9fe0232fed860dd4d846bebdb (patch) | |
tree | 3d3a12ca4c908d028439345de51f66f9c21ad520 /lisp | |
parent | c194bfd5af1ac1ef77caf17022ae9555033b3e90 (diff) |
fix setting lang un toot compose buffer
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mastodon-profile.el | 2 | ||||
-rw-r--r-- | lisp/mastodon-toot.el | 3 |
2 files changed, 2 insertions, 3 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el index 98ac9de..712d447 100644 --- a/lisp/mastodon-profile.el +++ b/lisp/mastodon-profile.el @@ -501,7 +501,7 @@ Returns the results as an alist." "Limit string X to 255 chars max." (if (> (length x) 255) (substring x 0 255) x)) -;; used in tl.el +;; used in tl.el and toot.el: (defun mastodon-profile--get-preferences-pref (pref) "Fetch PREF from the endpoint \"/preferences\". If `mastodon-profile-acccount-preferences-data' is set, fetch diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index 89b1eec..654918c 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -1892,8 +1892,7 @@ EDIT means we are editing an existing toot, not composing a new one." ;; `mastodon-profile-credential-account' nor in ;; `mastodon-profile-account-settings'! (setq mastodon-toot--language - (alist-get 'posting:default:language - mastodon-profile-acccount-preferences-data)) + (mastodon-profile--get-preferences-pref 'posting:default:language)) ;; display original toot: (if mastodon-toot-display-orig-in-reply-buffer (progn |