aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-tl.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-11-21 23:33:28 +0100
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2022-11-22 00:00:53 +0100
commit8b45a7a83de0747029b6cd1d1cf7628afef0ad6c (patch)
treec3ac28aeeb874d19b5884098712b34c4accfa596 /lisp/mastodon-tl.el
parent9b9431b130c1d8d1a03e445ae1f7803d2a511d70 (diff)
fix some tests due to params
Diffstat (limited to 'lisp/mastodon-tl.el')
-rw-r--r--lisp/mastodon-tl.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index fd74ed5..d0c2b0b 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -1315,7 +1315,7 @@ LINK-HEADER is the http Link header if present."
Then run CALLBACK with arguments CBARGS."
(let* ((args `(("max_id" . ,(mastodon-tl--as-string id))))
(url (mastodon-http--api endpoint)))
- (apply 'mastodon-http--get-json-async url params callback cbargs)))
+ (apply 'mastodon-http--get-json-async url args callback cbargs)))
;; TODO
;; Look into the JSON returned here by Local
@@ -1323,7 +1323,7 @@ Then run CALLBACK with arguments CBARGS."
"Return JSON for timeline ENDPOINT since ID."
(let* ((args `(("since_id" . ,(mastodon-tl--as-string id))))
(url (mastodon-http--api endpoint)))
- (mastodon-http--get-json url)))
+ (mastodon-http--get-json url args)))
(defun mastodon-tl--property (prop &optional backward)
"Get property PROP for toot at point.
@@ -1873,8 +1873,7 @@ INSTANCE is an instance domain name."
(response (mastodon-http--get-json
(if user
(mastodon-http--api "instance")
- (concat instance
- "/api/v1/instance"))
+ (concat instance "/api/v1/instance"))
nil
:vector)))
(when response
@@ -2462,7 +2461,7 @@ favourites."
(mastodon-http--get-response-async
url 'mastodon-tl--init* buffer endpoint update-function headers)
(mastodon-http--get-json-async
- url 'mastodon-tl--init* buffer endpoint update-function))))
+ url nil 'mastodon-tl--init* buffer endpoint update-function))))
(defun mastodon-tl--init* (response buffer endpoint update-function &optional headers)
"Initialize BUFFER with timeline targeted by ENDPOINT.