diff options
| author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2007-09-10 18:24:38 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2007-09-10 18:24:38 +0000 |
| commit | 28421945875ac7541b11a168f7fdda0edc309674 (patch) | |
| tree | a5c25561fdefcfba2c78b6b2d4edddf63ba535ad /lisp/net/browse-url.el | |
| parent | 9c9344319ef4eb058e6f238a4acca41042abf56c (diff) | |
| download | emacs-28421945875ac7541b11a168f7fdda0edc309674.tar.gz | |
(browse-url-encode-url): Use copy-sequence.
Diffstat (limited to 'lisp/net/browse-url.el')
| -rw-r--r-- | lisp/net/browse-url.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index 0263a620f31..d152f202561 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el @@ -621,7 +621,7 @@ down (this *won't* always work)." (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) |