aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1994-09-14 09:00:44 +0000
committerRichard M. Stallman1994-09-14 09:00:44 +0000
commit838cd60df95de0207196b78e483ce5288ad784e7 (patch)
treef7cada59ee9e60bbf7db3d93466655f5e4b40a1c
parent96616c048a224641d01c37bcb5fb7d0010c42ed9 (diff)
downloademacs-838cd60df95de0207196b78e483ce5288ad784e7.tar.gz
emacs-838cd60df95de0207196b78e483ce5288ad784e7.zip
(server-start): Always use pipes for communication.
-rw-r--r--lisp/server.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/server.el b/lisp/server.el
index 5b0f88a09f7..0e525a60fd4 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -158,7 +158,10 @@ Prefix arg means just kill any existing server communications subprocess."
158 nil 158 nil
159 (if server-process 159 (if server-process
160 (server-log (message "Restarting server"))) 160 (server-log (message "Restarting server")))
161 (setq server-process (start-process "server" nil server-program)) 161 ;; Using a pty is wasteful, and the separate session causes
162 ;; annoyance sometimes (some systems kill idle sessions).
163 (let ((process-connection-type nil))
164 (setq server-process (start-process "server" nil server-program)))
162 (set-process-sentinel server-process 'server-sentinel) 165 (set-process-sentinel server-process 'server-sentinel)
163 (set-process-filter server-process 'server-process-filter) 166 (set-process-filter server-process 'server-process-filter)
164 (process-kill-without-query server-process))) 167 (process-kill-without-query server-process)))