diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-01-27 23:08:29 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-01-27 23:08:29 +0000 |
| commit | 92c7831bff66ec6f4cc6be6687ab1bf0b00033d2 (patch) | |
| tree | 9901ad613633eeeb2f616f24205886f4a813497d /lisp/server.el | |
| parent | 0734b0d08d1d8d7fb50654261517624fdd3efd0e (diff) | |
| download | emacs-92c7831bff66ec6f4cc6be6687ab1bf0b00033d2.tar.gz | |
(server-socket-name): Don't use the hostname in the
socket name since /tmp is local to the host anyway.
Diffstat (limited to 'lisp/server.el')
| -rw-r--r-- | lisp/server.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/server.el b/lisp/server.el index 8e3b7e9a2cd..a6b2742190f 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -1,6 +1,6 @@ ;;; server.el --- Lisp code for GNU Emacs running as server process -;; Copyright (C) 1986,87,92,94,95,96,97,98,99,2000,01,02,2003 +;; Copyright (C) 1986,87,92,94,95,96,97,98,99,2000,01,02,03,2004 ;; Free Software Foundation, Inc. ;; Author: William Sommerfeld <wesommer@athena.mit.edu> @@ -160,8 +160,7 @@ are done with it in the server.") (make-variable-buffer-local 'server-existing-buffer) (defvar server-socket-name - (format "/tmp/emacs%d-%s/server" (user-uid) - (substring (system-name) 0 (string-match "\\." (system-name))))) + (format "/tmp/emacs%d/server" (user-uid))) (defun server-log (string &optional client) "If a *server* buffer exists, write STRING to it for logging purposes." |