diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-10-09 08:29:57 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-10-09 08:29:57 +0200 |
| commit | 553b3dc5e4ebd0b83ec34fa18407fec343c1422c (patch) | |
| tree | e825984ed3e6bd42f564064064f27335cf93aedc | |
| parent | 228a00c273ad9ded168ec77736d3cbdde36bd80b (diff) | |
user settings transient: use new tp-parse-args-for-send
| -rw-r--r-- | lisp/mastodon-transient.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/mastodon-transient.el b/lisp/mastodon-transient.el index 9b8d738..bbc8bc2 100644 --- a/lisp/mastodon-transient.el +++ b/lisp/mastodon-transient.el @@ -89,9 +89,7 @@ the format fields.X.keyname." :transient 'transient--do-exit ;; interactive receives args from the prefix: (interactive (list (transient-args 'mastodon-user-settings))) - (let* ((only-changed (tp-only-changed-args args)) - (arrays (tp-dots-to-arrays only-changed)) - (strs (tp-bools-to-strs arrays)) ;; we can't PATCH json + (let* ((strs (tp-parse-args-for-send args :strings)) (url (mastodon-http--api "accounts/update_credentials")) (resp (mastodon-http--patch url strs))) ;; :json fails (mastodon-http--triage |