Mercurial > emacs

diff lisp/net/browse-url.el @ 84458:6a870293225d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(browse-url-encode-url): Use copy-sequence.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Mon, 10 Sep 2007 18:22:48 +0000
parents f12fc8e7482c
children c431e16c1635
line wrap: on
line diff
--- a/lisp/net/browse-url.el	Mon Sep 10 18:21:58 2007 +0000
+++ b/lisp/net/browse-url.el	Mon Sep 10 18:22:48 2007 +0000
@@ -621,7 +621,7 @@
 
 (defun browse-url-encode-url (url)
   "Encode all `confusing' characters in URL."
-  (let ((encoded-url (copy-seq url)))
+  (let ((encoded-url (copy-sequence url)))
     (while (string-match "%" encoded-url)
       (setq encoded-url (replace-match "%25" t t encoded-url)))
     (while (string-match "[*\"()',=;? ]" encoded-url)