diff options
author | Grégoire Jadi <gjadi@omecha.info> | 2017-07-24 17:29:28 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2017-07-24 17:29:28 +0200 |
commit | fe25d0ce8e8b44c3e2ce84ac470822a299199445 (patch) | |
tree | 903b556b8d8f6b51d6af3f3409be80e528b1ac2e /lisp/net/shr.el | |
parent | 6dc5d45c542a6f9cfbcf3e37d597c9e0efb3070d (diff) | |
download | emacs-fe25d0ce8e8b44c3e2ce84ac470822a299199445.tar.gz emacs-fe25d0ce8e8b44c3e2ce84ac470822a299199445.tar.bz2 emacs-fe25d0ce8e8b44c3e2ce84ac470822a299199445.zip |
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.
Diffstat (limited to 'lisp/net/shr.el')
-rw-r--r-- | lisp/net/shr.el | 1 |
1 files changed, 1 insertions, 0 deletions
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))) |