Mercurial > emacs
changeset 85350:209a22b247e0
*** empty log message ***
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 17 Oct 2007 08:15:04 +0000 |
| parents | 54a59c3c9d8c |
| children | 0ef676a8ac09 |
| files | lisp/server.el |
| diffstat | 1 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/server.el Wed Oct 17 08:01:23 2007 +0000 +++ b/lisp/server.el Wed Oct 17 08:15:04 2007 +0000 @@ -505,11 +505,11 @@ (when server-use-tcp (let ((auth-key (loop - ;; The auth key is a 64-byte string of random chars in the - ;; range `!'..`~'. - for i below 64 - collect (+ 33 (random 94)) into auth - finally return (concat auth)))) + ;; The auth key is a 64-byte string of random chars in the + ;; range `!'..`~'. + for i below 64 + collect (+ 33 (random 94)) into auth + finally return (concat auth)))) (process-put server-process :auth-key auth-key) (with-temp-file server-file (set-buffer-multibyte nil)