Don't kill the temporary buffer after being called.

It's apparently being killed by url.el, and killing it made point move
to end-of-buffer in a random buffer.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 38f7adf..6a1b4e4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-01-23  Lars Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-html.el (gnus-html-image-fetched): Don't kill the temporary
+       buffer after being called.  It's apparently being killed by url.el, and
+       killing it made point move to end-of-buffer in a random buffer.
+
 2011-01-23  Julien Danjou  <julien@danjou.info>
 
        * mm-decode.el (mm-inline-media-tests): Change text/org to text/x-org.

diff --git a/lisp/gnus-html.el b/lisp/gnus-html.el
index acc018f..2e969b7 100644 (file)
--- a/lisp/gnus-html.el
+++ b/lisp/gnus-html.el
@@ -408,8 +408,7 @@ Use ALT-TEXT for the image string."
       (let ((data (buffer-substring (point) (point-max))))
         (with-current-buffer buffer
           (let ((inhibit-read-only t))
-            (gnus-html-put-image data (car image) (cadr image)))))))
-  (kill-buffer (current-buffer)))
+            (gnus-html-put-image data (car image) (cadr image))))))))
 
 (defun gnus-html-get-image-data (url)
   "Get image data for URL.