diff options
| author | Holger Dürer <me@hdurer.net> | 2021-11-02 21:25:18 +0100 |
|---|---|---|
| committer | Holger Dürer <me@hdurer.net> | 2021-11-06 16:15:00 +0100 |
| commit | d0bf4f196a9a30ea4e19b0b6fa5f9c5bfaf695b3 (patch) | |
| tree | 32f718b43fc5e32b12df199da528effb125b9d3e /lisp/mastodon-async.el | |
| parent | 64bfd211fd48b674c1fa4d65d5b61ac86331d8e5 (diff) | |
Convert most uses of `(cdr (assoc <some-symbol> <a-list>))` to `(alist-get <some-symbol> <a-list>)`
This is more readable and actually more efficient (maybe) since it
uses `eq` rather than `equal` as a test.
Diffstat (limited to 'lisp/mastodon-async.el')
| -rw-r--r-- | lisp/mastodon-async.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mastodon-async.el b/lisp/mastodon-async.el index 1fabee2..1fee9ef 100644 --- a/lisp/mastodon-async.el +++ b/lisp/mastodon-async.el @@ -305,7 +305,7 @@ Filter the toots using FILTER." "Test JSON to see if account is local." (not (string-match-p "@" - (cdr (assoc 'acct (cdr (assoc 'account json))))))) + (alist-get 'acct (alist-get 'account json))))) (defun mastodon-async--output-toot (toot) "Process TOOT and prepend it to the async user-facing buffer." |