Bug in browse-url.el

[Richard Stallman]

A look at the callers of browse-url-url-encode-chars led me to guess
that this change is needed.  But is it correct?

*** browse-url.el       17 Sep 2007 18:21:10 -0400      1.63
--- browse-url.el       20 Sep 2007 15:30:19 -0400      
***************
*** 622,628 ****
  (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))
        (s 0))
      (while (setq s (string-match chars encoded-url s))
        (setq encoded-url
--- 622,628 ----
  (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 text))
        (s 0))
      (while (setq s (string-match chars encoded-url s))
        (setq encoded-url