From 596a9498a8dcc2aecb28f94f9ba57766583f5fab Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Wed, 9 Nov 2022 12:22:04 +0100
Subject: --init: handle json or full response and handle Link header

---
 lisp/mastodon-http.el | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lisp/mastodon-http.el')

diff --git a/lisp/mastodon-http.el b/lisp/mastodon-http.el
index 5546325..fedbe95 100644
--- a/lisp/mastodon-http.el
+++ b/lisp/mastodon-http.el
@@ -191,6 +191,7 @@ Return a cons of JSON list and http response headers."
                     (re-search-forward "^$" nil 'move)))
          (head-list (split-string head-str "\n")))
     (mapcar (lambda (x)
+              ;; FIXME: use dotted notation so alist-get doesn't return a list
               (split-string x ": "))
             head-list)))
 
-- 
cgit v1.2.3