* lisp/net/shr.el (shr-copy-url): Fix docstring.
This commit is contained in:
parent
d309994aff
commit
7f5086da05
1 changed files with 3 additions and 3 deletions
|
@ -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")
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue