1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

Don't quote lambda expressions with `quote'.

This commit is contained in:
Stefan Monnier 2011-05-23 14:57:17 -03:00
parent 782fc81943
commit 4f91a8160f
77 changed files with 466 additions and 493 deletions

View file

@ -447,11 +447,11 @@ Please submit bug reports and other feedback to the author, Neil W. Van Dyke
(or (null str) (string-match "^[ \t]*$" str)))
(defun webjump-url-encode (str)
(mapconcat '(lambda (c)
(let ((s (char-to-string c)))
(cond ((string= s " ") "+")
((string-match "[a-zA-Z_.-/]" s) s)
(t (upcase (format "%%%02x" c))))))
(mapconcat (lambda (c)
(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)
""))