mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-06 11:55:48 +00:00
* lisp/net/shr.el (shr-copy-url): Fix docstring.
This commit is contained in:
parent
d309994aff
commit
7f5086da05
@ -302,9 +302,9 @@ under point instead."
|
||||
|
||||
(defun shr-copy-url (url)
|
||||
"Copy the URL under point to the kill ring.
|
||||
If IMAGE-URL (the prefix) is non-nil, or there is no link under
|
||||
point, but there is an image under point then copy the URL of the
|
||||
image under point instead."
|
||||
With a prefix argument, or if there is no link under point, but
|
||||
there is an image under point then copy the URL of the image
|
||||
under point instead."
|
||||
(interactive (list (shr-url-at-point current-prefix-arg)))
|
||||
(if (not url)
|
||||
(message "No URL under point")
|
||||
|
Loading…
Reference in New Issue
Block a user