Function: gnus-html-image-fetched

gnus-html-image-fetched is a byte-compiled function defined in gnus-html.el.gz.

Signature

(gnus-html-image-fetched STATUS BUFFER IMAGE)

Documentation

Callback function called when image has been fetched.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-html.el.gz
(defun gnus-html-image-fetched (status buffer image)
  "Callback function called when image has been fetched."
  (unless (plist-get status :error)
    (when (and (or (search-forward "\n\n" nil t)
                   (search-forward "\r\n\r\n" nil t))
	       (not (eobp)))
      (when gnus-html-image-automatic-caching
	(url-store-in-cache (current-buffer)))
      (when (buffer-live-p buffer)
	(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)))