Commit 80f462b7 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(webjump-url-encode): Fix for non-ASCII characters.

parent d7e69846
2007-07-25 William Xu <william.xwl@gmail.com> (tiny change)
* net/webjump.el (webjump-url-encode): Fix for non-ASCII
characters.
2007-07-24 Dan Nicolaescu <dann@ics.uci.edu>
* dired.el (dired-mode-map): Bind wdired-change-to-wdired-mode to
......
......@@ -451,14 +451,12 @@ Please submit bug reports and other feedback to the author, Neil W. Van Dyke
(defun webjump-url-encode (str)
(mapconcat '(lambda (c)
(cond ((= c 32) "+")
((or (and (>= c ?a) (<= c ?z))
(and (>= c ?A) (<= c ?Z))
(and (>= c ?0) (<= c ?9)))
(char-to-string c))
(t (upcase (format "%%%02x" c)))))
str
""))
(let ((s (char-to-string c)))
(cond ((string= s " ") "+")
((string-match "[a-zA-Z_.-/]" s) s)
(t (upcase (format "%%%02x" c))))))
(encode-coding-string str 'utf-8)
""))
(defun webjump-url-fix (url)
(if (webjump-null-or-blank-string-p url)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment