diff options
author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-09-15 11:46:15 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-09-15 11:46:15 +0200 |
commit | acccb84045b8bc57cbf5a863cc7ab9dc0ca5af4d (patch) | |
tree | afd22a2fba180b55d4876cc7718b6b6b0cf8c4dc | |
parent | d4c105cc39315de3c9f3f29b97de0c0dec718770 (diff) |
alist-get testfun equal in set-toot-language
-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 d974e04..53ddeee 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)) + (alist-get choice mastodon-iso-639-1 nil nil 'equal)) (message "Language set to %s" choice) (mastodon-toot--update-status-fields))) |