From fe25d0ce8e8b44c3e2ce84ac470822a299199445 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Gr=C3=A9goire=20Jadi?= <gjadi@omecha.info>
Date: Mon, 24 Jul 2017 17:29:28 +0200
Subject: [PATCH] Ensure that we parse images right in shr.el

* lisp/net/shr.el (shr-image-fetched): Go back to the
beginning of the buffer before trying to parse the image
fetched.
---
 lisp/net/shr.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 2f73f982af9..fe93fc32ad3 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -945,6 +945,7 @@ If EXTERNAL, browse the URL using `shr-external-browser'."
     (when (and (buffer-name buffer)
 	       (not (plist-get status :error)))
       (url-store-in-cache image-buffer)
+      (goto-char (point-min))
       (when (or (search-forward "\n\n" nil t)
 		(search-forward "\r\n\r\n" nil t))
 	(let ((data (shr-parse-image-data)))
-- 
2.39.5