1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 5e2e1eadf86..dae72b682b0 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -246,9 +246,9 @@ redirects somewhere else."
      ;; Copy the URL to the kill ring.
      (t
       (with-temp-buffer
-        (insert url)
+        (insert (url-encode-url url))
         (copy-region-as-kill (point-min) (point-max))
-        (message "Copied %s" url))))))
+        (message "Copied %s" (buffer-substring)))))))
 
 (defun shr-next-link ()
   "Skip to the next link."