aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-toot.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2023-08-27 22:39:45 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2023-08-29 15:33:55 -0400
commit3212f5dd0b5716e1bb4db60fb65bd950c08ec12a (patch)
treecee6416b5864b16392b42c9a10d912ecc3c85356 /lisp/mastodon-toot.el
parent3bb7635c3e9d8df3fa546a0009de2fe2ed5b7a53 (diff)
Simplify calls to `alist-get`
* lisp/mastodon-toot.el (mastodon-toot--set-toot-language): * lisp/mastodon-tl.el (mastodon-tl--read-rules-ids): * lisp/mastodon-profile.el (mastodon-profile--remove-from-followers-list): * lisp/mastodon-auth.el (mastodon-auth--access-token): * lisp/mastodon-views.el (mastodon-views--add-account-to-list) (mastodon-views--remove-account-from-list): Remove redundant optional arg to `alist-get` (`equal` is already the default).
Diffstat (limited to 'lisp/mastodon-toot.el')
-rw-r--r--lisp/mastodon-toot.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index 14b9d68..f14aec3 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -1130,7 +1130,7 @@ Return its two letter ISO 639 1 code."
(let* ((choice (completing-read "Language for this toot: "
mastodon-iso-639-1)))
(setq mastodon-toot--language
- (alist-get choice mastodon-iso-639-1 nil nil 'equal))
+ (alist-get choice mastodon-iso-639-1))
(message "Language set to %s" choice)
(mastodon-toot--update-status-fields)))