From 0b65ec90bd829530fe8bef843f873c3ecc6c0721 Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Mon, 12 Sep 2022 16:26:45 +0200
Subject: respect user pref reading:expand:spoilers for CWs

respect always expand CWd posts account preference
---
 lisp/mastodon-profile.el | 9 +++++++++
 1 file changed, 9 insertions(+)

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

diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index b404bb6..012e357 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -365,6 +365,15 @@ Current settings are fetched from the server."
   (interactive)
   (mastodon-profile--edit-string-value 'display_name))
 
+(defun mastodon-profile--get-preferences-pref (pref)
+  "Fetch PREF from the endpoint \"/preferences\".
+This endpoint only holds a few preferences. For others, see
+`mastodon-profile--update-preference' and its endpoint,
+\"/accounts/update_credentials.\""
+  (alist-get pref
+             (mastodon-http--get-json
+              (mastodon-http--api "preferences"))))
+
 (defun mastodon-profile-view-preferences ()
   "View user preferences in another window."
   (interactive)
-- 
cgit v1.2.3