aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-08-31 21:44:26 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-08-31 21:44:26 +0200
commit7e98dae4756b62b34a2526ef6c776258db4c5202 (patch)
tree41ccd26e2c789e6043ecfbaae4a40be87fa25fdc /lisp
parenta30b8353d122a753be6fcf38fe84f7da99ad2ebd (diff)
improve set default-toot-visibility formatting
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-profile.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mastodon-profile.el b/lisp/mastodon-profile.el
index 5c4adaa..c43906f 100644
--- a/lisp/mastodon-profile.el
+++ b/lisp/mastodon-profile.el
@@ -263,11 +263,11 @@ JSON is the data returned by the server."
Both args are strings.
SOURCE means that the preference is in the 'source' part of the account json."
(let* ((url (mastodon-http--api "accounts/update_credentials"))
- (pref (if source (concat "source[" pref "]") pref))
- (response (mastodon-http--patch url `((,pref ,val)))))
+ (pref-formatted (if source (concat "source[" pref "]") pref))
+ (response (mastodon-http--patch url `((,pref-formatted ,val)))))
(mastodon-http--triage response
(lambda ()
- (message "Account setting %s updated!" pref)))))
+ (message "Account setting %s updated to %s!" pref val)))))
(defun mastodon-profile-account-locked-toggle ()
"Toggle the locked status of the user's account.