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

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 5582e29c5266f02dff512cfad7382126cd41f6fc..364f289e1ab02854dd662f8e83f565b1d98bec4f 100644 (file)
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -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")