aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-tl.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-04-28 17:06:53 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-04-28 17:08:27 +0200
commitbec7a01c1fe63fdb9ca45602ec71315514b4572d (patch)
tree680c62c2f715cc2155b4c031ff7e08cb0c79d2fe /lisp/mastodon-tl.el
parentd841c2522ea63e5a2e02811b20506185072740ca (diff)
no quasi-quotes for let-alist dots
Diffstat (limited to 'lisp/mastodon-tl.el')
-rw-r--r--lisp/mastodon-tl.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 92ca02a..a567544 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -2176,9 +2176,10 @@ report the account for spam."
(defvar crm-separator)
(defun mastodon-tl--map-rules-alist (rules)
+ "Return an alist of the text and id fields of RULES."
(mapcar (lambda (x)
(let-alist x
- `(,.text . ,.id)))
+ (cons .text .id)))
rules))
(defun mastodon-tl--read-rules-ids ()