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

(server-start): Try both possible socket file names for the file to delete.

parent 0588a761
......@@ -147,6 +147,9 @@ Prefix arg means just kill any existing server communications subprocess."
(set-process-sentinel server-process nil)
(condition-case () (delete-process server-process) (error nil))))
(condition-case () (delete-file "~/.emacs_server") (error nil))
(condition-case ()
(delete-file (format "/tmp/esrv%d-%s" (user-uid) (system-name)))
(error nil))
;; If we already had a server, clear out associated status.
(while server-clients
(let ((buffer (nth 1 (car server-clients))))
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