diff options
| author | Glenn Morris | 2007-10-13 03:01:49 +0000 |
|---|---|---|
| committer | Glenn Morris | 2007-10-13 03:01:49 +0000 |
| commit | b86ed609acffe60f36c51cdb5f92ddd168657bd5 (patch) | |
| tree | d6d7795b1c290aad7df5fe529203b14032daf7fc | |
| parent | 6b7513e304e2acd4503b454c7507bba8fb5a8562 (diff) | |
| download | emacs-b86ed609acffe60f36c51cdb5f92ddd168657bd5.tar.gz emacs-b86ed609acffe60f36c51cdb5f92ddd168657bd5.zip | |
(socks-build-auth-list): Use mapc rather than mapcar.
| -rw-r--r-- | lisp/net/socks.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/socks.el b/lisp/net/socks.el index 5079e84ce19..fd8e7ec59f2 100644 --- a/lisp/net/socks.el +++ b/lisp/net/socks.el | |||
| @@ -247,7 +247,7 @@ If PATTERN is omitted, it defaults to \"[ \\f\\t\\n\\r\\v]+\"." | |||
| 247 | (defun socks-build-auth-list () | 247 | (defun socks-build-auth-list () |
| 248 | (let ((num 0) | 248 | (let ((num 0) |
| 249 | (retval "")) | 249 | (retval "")) |
| 250 | (mapcar | 250 | (mapc |
| 251 | (function | 251 | (function |
| 252 | (lambda (x) | 252 | (lambda (x) |
| 253 | (if (fboundp (cdr (cdr x))) | 253 | (if (fboundp (cdr (cdr x))) |