aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-search.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-10-14 10:00:44 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-10-14 10:00:44 +0200
commit1bd34da21be4abcb310418a7db3da726efa24780 (patch)
treeb7d803d99d1d5fe7083af7db26d16f95d8dc6565 /lisp/mastodon-search.el
parent2b2d6b03ba7837f927b6c69ac44b78ac8b7789d6 (diff)
rename search-query to query
Diffstat (limited to 'lisp/mastodon-search.el')
-rw-r--r--lisp/mastodon-search.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/mastodon-search.el b/lisp/mastodon-search.el
index 2a2a995..772bfd2 100644
--- a/lisp/mastodon-search.el
+++ b/lisp/mastodon-search.el
@@ -144,9 +144,9 @@ PRINT-FUN is the function used to print the data from the response."
(defvar mastodon-search-types
'("statuses" "accounts" "hashtags"))
-(defun mastodon-search--search-query (query
- &optional type limit
- following account-id offset)
+(defun mastodon-search--query (query
+ &optional type limit
+ following account-id offset)
"Prompt for a search QUERY and return accounts, statuses, and hashtags.
TYPE is a member of `mastodon-search-types'.
LIMIT is a number as string, up to 40, with 40 the default.
@@ -221,16 +221,16 @@ ACCOUNT-ID means limit search to that account, for \"statuses\" type only."
(type (alist-get "type" spec nil nil #'equal))
(query (alist-get "q" spec nil nil #'equal)))
(cond ((equal type "hashtags")
- (mastodon-search--search-query query "accounts"))
+ (mastodon-search--query query "accounts"))
((equal type "accounts")
- (mastodon-search--search-query query "statuses"))
+ (mastodon-search--query query "statuses"))
((equal type "statuses")
- (mastodon-search--search-query query "hashtags")))))
+ (mastodon-search--query query "hashtags")))))
(defun mastodon-serach--query-accounts-followed (query)
"Run an accounts search QUERY, limited to your followers."
(interactive "sSearch mastodon for: ")
- (mastodon-search--search-query query "accounts" :following))
+ (mastodon-search--query query "accounts" :following))
(defun mastodon-search--insert-users-propertized (json &optional note)
"Insert users list into the buffer.