diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 5582e29c526..364f289e1ab 100644
--- 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")