From 5e31b1b484736b771b58a5d153b7e6e8f22cb364 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Tue, 20 Feb 2024 09:52:02 +0100 Subject: http: some hack error handling in get-response --- lisp/mastodon-http.el | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/mastodon-http.el b/lisp/mastodon-http.el index 541c92e..a345324 100644 --- a/lisp/mastodon-http.el +++ b/lisp/mastodon-http.el @@ -179,8 +179,14 @@ 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))) + ;; (if (not buf) + ;; (error "Request returned nada") + (condition-case x + (with-current-buffer buf + (mastodon-http--process-response no-headers vector)) + (wrong-type-argument + (error "Request returned nada"))))) (defun mastodon-http--get-json (url &optional params silent vector) "Return only JSON data from URL request. -- cgit v1.2.3