diff options
author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-14 10:00:44 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-10-14 10:00:44 +0200 |
commit | 1bd34da21be4abcb310418a7db3da726efa24780 (patch) | |
tree | b7d803d99d1d5fe7083af7db26d16f95d8dc6565 /lisp/mastodon-search.el | |
parent | 2b2d6b03ba7837f927b6c69ac44b78ac8b7789d6 (diff) |
rename search-query to query
Diffstat (limited to 'lisp/mastodon-search.el')
-rw-r--r-- | lisp/mastodon-search.el | 14 |
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. |