aboutsummaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus@riseup.net>2024-05-29 15:56:31 +0200
committermarty hiatt <martianhiatus@riseup.net>2024-05-30 10:18:07 +0200
commit9785650845b3f1d988b080ff14e166bbd390863e (patch)
treeaa786933829a3e7cc8ffebcd8f39abc0eaf45f47 /lisp
parent5b321820fa23fba187c8bb92c159e2c76eb1407e (diff)
docstring and index
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-http.el3
-rw-r--r--lisp/mastodon-tl.el7
2 files changed, 7 insertions, 3 deletions
diff --git a/lisp/mastodon-http.el b/lisp/mastodon-http.el
index 4721087..60654ff 100644
--- a/lisp/mastodon-http.el
+++ b/lisp/mastodon-http.el
@@ -142,9 +142,10 @@ Used for API form data parameters that take an array."
"POST synchronously to URL, optionally with PARAMS and HEADERS.
Authorization header is included by default unless
UNAUTHENTICATED-P is non-nil.
-
If JSON is :json, encode PARAMS as JSON for
the request data. If it is :raw, just use the plain params."
+ ;; NB: raw is used by `mastodon-tl--unfilter-user-languages'; not sure if
+ ;; there's a way around it?
(mastodon-http--authorized-request "POST"
(let* ((url-request-data
(when params
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index 3d33e86..67e13b6 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -2103,12 +2103,15 @@ desired language if they are not marked as such (or as anything)."
(mastodon-tl--follow-user user-handle nil langs))))
(defun mastodon-tl--unfilter-user-languages (user-handle)
- ""
+ "Remove any language filters for USER-HANDLE.
+This means you will receive posts of theirs marked as being in
+any or no language."
(interactive
(list (mastodon-tl--user-handles-get "filter by language")))
(let ((langs "languages[]"))
(mastodon-tl--do-if-item
- ;; we need ("languages[]") as a param, with no "="
+ ;; we need "languages[]" as a param, with no "=" and not json-encoded as
+ ;; a string
(mastodon-tl--follow-user user-handle nil langs nil :raw))))
(defun mastodon-tl--read-filter-langs (&optional langs)