[nongnu] elpa/mastodon 0e1cc5489a 02/38: tiny transient.el cleanup: triage response args

[ELPA Syncer]

branch: elpa/mastodon
commit 0e1cc5489a841ce60ee04f0ddeb931717a6f6e1f
Author: marty hiatt <martianhia...@disroot.org>
Commit: marty hiatt <martianhia...@disroot.org>

    tiny transient.el cleanup: triage response args
---
 lisp/mastodon-transient.el | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/lisp/mastodon-transient.el b/lisp/mastodon-transient.el
index 3e8ba5f820..b3d5b857f4 100644
--- a/lisp/mastodon-transient.el
+++ b/lisp/mastodon-transient.el
@@ -131,7 +131,7 @@ the format fields.X.keyname."
          (resp (mastodon-http--patch url strs))) ;; :json fails
     (mastodon-http--triage
      resp
-     (lambda (_)
+     (lambda (resp)
        (message "Settings updated!\n%s" (pp-to-string strs))))))
 
 (transient-define-prefix mastodon-user-settings ()
@@ -155,16 +155,14 @@ the format fields.X.keyname."
    ("d"  "discoverable" "discoverable" :alist-key discoverable :class tp-bool)
    ("c" "hide follower/following lists" "source.hide_collections"
     :alist-key source.hide_collections :class tp-bool)
-   ("i" "indexable" "source.indexable" :alist-key source.indexable :class 
tp-bool)
-   ]
+   ("i" "indexable" "source.indexable" :alist-key source.indexable :class 
tp-bool)]
   ["Tooting options"
    ("p" "default privacy" "source.privacy" :alist-key source.privacy
     :class tp-option
     :choices (lambda () mastodon-toot-visibility-settings-list))
    ("s" "mark sensitive" "source.sensitive" :alist-key source.sensitive :class 
tp-bool)
    ("g" "default language" "source.language" :alist-key source.language :class 
tp-option
-    :choices (lambda () mastodon-iso-639-regional))
-   ]
+    :choices (lambda () mastodon-iso-639-regional))]
   ["Update"
    ("C-c C-c" "Save settings" mastodon-user-settings-update)
    ("C-c C-k" :info "Revert all changes")]
@@ -192,7 +190,7 @@ the format fields.X.keyname."
          (url (mastodon-http--api endpoint))
          (resp (mastodon-http--patch url arrays))) ; :json)))
     (mastodon-http--triage
-     resp (lambda (_) (message "Fields updated!")))))
+     resp (lambda (resp) (message "Fields updated!")))))
 
 (defun mastodon-transient-fetch-fields ()
   "Fetch profile fields (metadata)."