diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-10-03 20:03:10 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-10-03 20:03:10 +0200 |
| commit | fe27477d19cb78c75e0e9508041f58ff722ab8ca (patch) | |
| tree | 94cbc22621fbb8f83d3a0a8f26cbd97c682e4b24 /lisp/mastodon-transient.el | |
| parent | d57b733b3a55cf6f341ac561db7fa028c9923f65 (diff) | |
do-return (to parent) for fields update
Diffstat (limited to 'lisp/mastodon-transient.el')
| -rw-r--r-- | lisp/mastodon-transient.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/mastodon-transient.el b/lisp/mastodon-transient.el index 7738958..cc314f8 100644 --- a/lisp/mastodon-transient.el +++ b/lisp/mastodon-transient.el @@ -156,7 +156,7 @@ the inner key part." (transient-define-suffix mastodon-profile-fields-update (args) "Update current user profile fields." - :transient 'transient--do-exit + :transient 'transient--do-return (interactive (list (transient-args 'mastodon-profile-fields))) (let* ((alist (tp-transient-to-alist args)) ;; FIXME: maybe only changed also won't work with fields, as @@ -167,9 +167,7 @@ the inner key part." (url (mastodon-http--api endpoint)) (resp (mastodon-http--patch url arrays))) ; :json))) (mastodon-http--triage - resp - (lambda (_) - (message "Fields updated!\n%s" (pp-to-string arrays)))))) + resp (lambda (_) (message "Fields updated!"))))) (transient-define-prefix mastodon-profile-fields () "A transient for setting profile fields." |