[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v
From: |
Michael Cadilhac |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v |
Date: |
Wed, 19 Sep 2007 11:21:48 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Michael Cadilhac <cadilhac> 07/09/19 11:21:47
Index: browse-url.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/browse-url.el,v
retrieving revision 1.63
retrieving revision 1.64
diff -u -b -r1.63 -r1.64
--- browse-url.el 17 Sep 2007 15:59:41 -0000 1.63
+++ browse-url.el 19 Sep 2007 11:21:47 -0000 1.64
@@ -622,15 +622,15 @@
(defun browse-url-url-encode-chars (text chars)
"URL-encode the chars in TEXT that match CHARS.
CHARS is a regexp-like character alternative (e.g., \"[,)$]\")."
- (let ((encoded-url (copy-sequence url))
+ (let ((encoded-text (copy-sequence text))
(s 0))
- (while (setq s (string-match chars encoded-url s))
- (setq encoded-url
+ (while (setq s (string-match chars encoded-text s))
+ (setq encoded-text
(replace-match (format "%%%x"
- (string-to-char (match-string 0
encoded-url)))
- t t encoded-url)
+ (string-to-char (match-string 0
encoded-text)))
+ t t encoded-text)
s (1+ s)))
- encoded-url))
+ encoded-text))
(defun browse-url-encode-url (url)
"Escape annoying characters in URL.
- [Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v, Glenn Morris, 2007/09/07
- [Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v, Eli Zaretskii, 2007/09/08
- [Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v, Michael Cadilhac, 2007/09/12
- [Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v, Michael Cadilhac, 2007/09/17
- [Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v,
Michael Cadilhac <=
- [Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,v, Michael Cadilhac, 2007/09/19