* lisp/net/shr.el (shr-copy-url): Fix docstring.

This commit is contained in:
Noam Postavsky 2018-09-27 19:36:09 -04:00
parent d309994aff
commit 7f5086da05

View file

@ -302,9 +302,9 @@ under point instead."
(defun shr-copy-url (url) (defun shr-copy-url (url)
"Copy the URL under point to the kill ring. "Copy the URL under point to the kill ring.
If IMAGE-URL (the prefix) is non-nil, or there is no link under With a prefix argument, or if there is no link under point, but
point, but there is an image under point then copy the URL of the there is an image under point then copy the URL of the image
image under point instead." under point instead."
(interactive (list (shr-url-at-point current-prefix-arg))) (interactive (list (shr-url-at-point current-prefix-arg)))
(if (not url) (if (not url)
(message "No URL under point") (message "No URL under point")