From ae51f4c0bfca79559965ee253e82f45388d83fae Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus [a t] riseup [d o t] net>
Date: Tue, 20 Jun 2023 18:58:26 +0200
Subject: fix html render on error in process-json

---
 lisp/mastodon-http.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lisp')

diff --git a/lisp/mastodon-http.el b/lisp/mastodon-http.el
index dc007f3..4a8e76a 100644
--- a/lisp/mastodon-http.el
+++ b/lisp/mastodon-http.el
@@ -184,7 +184,7 @@ Callback to `mastodon-http--get-json-async', usually
   "Render STRING as HTML in a temp buffer.
 STRING should be a HTML for a 404 errror."
   (with-temp-buffer
-    (insert json-string)
+    (insert string)
     (shr-render-buffer (current-buffer))
     (view-mode) ; for 'q' to kill buffer and window
     (error ""))) ; stop subsequent processing
@@ -212,7 +212,7 @@ Callback to `mastodon-http--get-response-async', usually
             ;; if we get html, just render it and error:
             ;; ideally we should handle the status code in here rather than
             ;; this crappy hack?
-            ((string-prefix-p "\n<!" json-string) ; html hack
+            ((string-prefix-p "\n<" json-string) ; html hack
              (mastodon-http--render-html-err json-string))
             ;; if no json or html, maybe we have a plain string error message
             ;; (misskey does this, but there are probably better ways to do
-- 
cgit v1.2.3