Commit 838cd60d authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(server-start): Always use pipes for communication.

parent 96616c04
...@@ -158,7 +158,10 @@ Prefix arg means just kill any existing server communications subprocess." ...@@ -158,7 +158,10 @@ Prefix arg means just kill any existing server communications subprocess."
nil nil
(if server-process (if server-process
(server-log (message "Restarting server"))) (server-log (message "Restarting server")))
(setq server-process (start-process "server" nil server-program)) ;; Using a pty is wasteful, and the separate session causes
;; annoyance sometimes (some systems kill idle sessions).
(let ((process-connection-type nil))
(setq server-process (start-process "server" nil server-program)))
(set-process-sentinel server-process 'server-sentinel) (set-process-sentinel server-process 'server-sentinel)
(set-process-filter server-process 'server-process-filter) (set-process-filter server-process 'server-process-filter)
(process-kill-without-query server-process))) (process-kill-without-query server-process)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment