diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-02-23 17:57:35 +0100 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-02-23 17:57:35 +0100 |
| commit | d66e27be92992a628b27cd630939ed99c36f0cd8 (patch) | |
| tree | b668d26aa806bc339117faa99d802ddd98e2bf20 /lisp/mastodon-http.el | |
| parent | d93fb56ef0e29956dc55befff84301b5b4eed548 (diff) | |
| parent | 96866e176e469811642b66b971f3125f040de5de (diff) | |
Merge branch 'develop'
Diffstat (limited to 'lisp/mastodon-http.el')
| -rw-r--r-- | lisp/mastodon-http.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mastodon-http.el b/lisp/mastodon-http.el index a357672..aef8975 100644 --- a/lisp/mastodon-http.el +++ b/lisp/mastodon-http.el @@ -179,8 +179,9 @@ PARAMS is an alist of any extra parameters to send with the request. SILENT means don't message. NO-HEADERS means don't collect http response headers. VECTOR means return json arrays as vectors." - (with-current-buffer (mastodon-http--get url params silent) - (mastodon-http--process-response no-headers vector))) + (let ((buf (mastodon-http--get url params silent))) + (with-current-buffer buf + (mastodon-http--process-response no-headers vector)))) (defun mastodon-http--get-json (url &optional params silent vector) "Return only JSON data from URL request. @@ -240,7 +241,6 @@ Callback to `mastodon-http--get-response-async', usually (defun mastodon-http--process-headers () "Return an alist of http response headers." - (switch-to-buffer (current-buffer)) (goto-char (point-min)) (let* ((head-str (buffer-substring-no-properties (point-min) |