From: Juanma Barranquero Date: Wed, 17 Oct 2007 08:15:04 +0000 (+0000) Subject: *** empty log message *** X-Git-Tag: emacs-pretest-23.0.90~10292 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d76e2046517074274f600f8e279cfd506376913a;p=emacs.git *** empty log message *** --- diff --git a/lisp/server.el b/lisp/server.el index 7d7b001b33f..c66ff7cfdd6 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -505,11 +505,11 @@ kill any existing server communications subprocess." (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)