diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2023-08-27 22:39:45 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2023-08-27 22:54:34 -0400 |
commit | 123c7cf0a5ad4ab3f6eb86fd18daefa37e29d253 (patch) | |
tree | d9225278cea5e1a0588ca8c9de0e0902647eed2c /lisp/mastodon-toot.el | |
parent | 6360c8b9d06cdbebaa8254abdbc8f70550c78507 (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.el | 2 |
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))) |