summaryrefslogtreecommitdiff
path: root/lisp/net/socks.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/net/socks.el')
-rw-r--r--lisp/net/socks.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/net/socks.el b/lisp/net/socks.el
index 84fc5dccace..9b22a5083fb 100644
--- a/lisp/net/socks.el
+++ b/lisp/net/socks.el
@@ -235,11 +235,10 @@
(let ((num 0)
(retval ""))
(mapc
- (function
- (lambda (x)
- (if (fboundp (cdr (cdr x)))
- (setq retval (format "%s%c" retval (car x))
- num (1+ num)))))
+ (lambda (x)
+ (if (fboundp (cdr (cdr x)))
+ (setq retval (format "%s%c" retval (car x))
+ num (1+ num))))
(reverse socks-authentication-methods))
(format "%c%s" num retval)))