]> code.delx.au - gnu-emacs/blobdiff - lisp/net/webjump.el
Don't quote lambda expressions with `quote'.
[gnu-emacs] / lisp / net / webjump.el
index be79bc721e29b335a9e1effd0f255be82d435580..3a2560b3c6126932f85be57470c6cbc76ceb7e33 100644 (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)
              ""))