changeset 84458:6a870293225d

(browse-url-encode-url): Use copy-sequence.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Mon, 10 Sep 2007 18:22:48 +0000
parents 33b5c158a227
children 421165172d8f
files lisp/net/browse-url.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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)