From 717b8f9127eacaba14b2f32a87e655401b88b9b8 Mon Sep 17 00:00:00 2001 From: Julien Danjou Date: Wed, 22 Sep 2010 14:50:59 +0200 Subject: [PATCH] gnus-html-get-image-data: Search also for \r\n\r\n to get the start of data Signed-off-by: Julien Danjou --- lisp/ChangeLog | 3 +++ lisp/gnus-html.el | 3 ++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e6aba95cf..54a1ff857 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -4,6 +4,9 @@ 2010-09-22 Julien Danjou + * gnus-html.el (gnus-html-get-image-data): Search also for \r\n\r\n to + get the start of data. + * gnus-group.el (gnus-group-update-hook): Call gnus-group-add-icon by default. (gnus-group-add-icon): Move to gnus-group.el, and rewrite so it works. diff --git a/lisp/gnus-html.el b/lisp/gnus-html.el index 366c331c5..847a3d148 100644 --- a/lisp/gnus-html.el +++ b/lisp/gnus-html.el @@ -371,7 +371,8 @@ Return a string with image data." (with-temp-buffer (mm-disable-multibyte) (url-cache-extract (url-cache-create-filename url)) - (when (search-forward "\n\n" nil t) + (when (or (search-forward "\n\n" nil t) + (search-forward "\r\n\r\n" nil t)) (buffer-substring (point) (point-max))))) (defun gnus-html-put-image (data start end &optional url alt-text) -- 2.25.1