(server-start): Save also the Emacs pid in the server authentication file.

diff --git a/lisp/server.el b/lisp/server.el
index 992d917f9862d3bc54accac79fd244ef5f2f26b2..9214391d861ff24caf5b5c647398c097432470a9 100644 (file)
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -360,6 +360,7 @@ Prefix arg means just kill any existing server communications subprocess."
               (setq buffer-file-coding-system 'no-conversion)
               (insert (format-network-address
                        (process-contact server-process :local))
+                      " " (int-to-string (emacs-pid))
                       "\n" auth-key))))))))
 
 ;;;###autoload