Function: shr-browse-image

shr-browse-image is an interactive and byte-compiled function defined in shr.el.gz.

Signature

(shr-browse-image &optional COPY-URL)

Documentation

Browse the image under point.

If COPY-URL (the prefix if called interactively) is non-nil, copy the URL of the image to the kill buffer instead.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/net/shr.el.gz
(defun shr-browse-image (&optional copy-url)
  "Browse the image under point.
If COPY-URL (the prefix if called interactively) is non-nil, copy
the URL of the image to the kill buffer instead."
  (interactive "P")
  (let ((url (get-text-property (point) 'image-url)))
    (cond
     ((not url)
      (message "No image under point"))
     (copy-url
      (with-temp-buffer
	(insert url)
	(copy-region-as-kill (point-min) (point-max))
	(message "Copied %s" url)))
     (t
      (message "Browsing %s..." url)
      (browse-url url)))))