diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-03-21 14:50:55 +0100 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-03-21 14:50:55 +0100 |
| commit | fdeeb396c7c2c9a6618661e2ea5d24b999a0e42f (patch) | |
| tree | 7da88b00c9b2f7806ecd039fb3b7f4d9e8669f7c /lisp/mastodon-search.el | |
| parent | d654ab86bde598072d6b8e6a4ca398198bfb9882 (diff) | |
manually(!) apply stephan monnier's patch, save the ts work
thanks stephan!
Diffstat (limited to 'lisp/mastodon-search.el')
| -rw-r--r-- | lisp/mastodon-search.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mastodon-search.el b/lisp/mastodon-search.el index 80a26ff..b5900c7 100644 --- a/lisp/mastodon-search.el +++ b/lisp/mastodon-search.el @@ -121,7 +121,7 @@ QUERY is the string to search." tags)) ;; (status-list (mapcar #'mastodon-search--get-status-info ;; statuses)) - (status-ids-list (mapcar 'mastodon-search--get-id-from-status + (status-ids-list (mapcar #'mastodon-search--get-id-from-status statuses)) (toots-list-json (mapcar #'mastodon-search--fetch-full-status-from-id status-ids-list))) @@ -153,7 +153,7 @@ QUERY is the string to search." " STATUSES\n" " ------------\n") 'success)) - (mapc 'mastodon-tl--toot toots-list-json) + (mapc #'mastodon-tl--toot toots-list-json) (goto-char (point-min)))))) (defun mastodon-search--insert-users-propertized (json &optional note) |