Mercurial > emacs
changeset 8202:80350a95921a
(server-start): Try both possible socket file names for the file to delete.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 11 Jul 1994 20:36:53 +0000 |
| parents | 686198604dc7 |
| children | 7f13bc5470d9 |
| files | lisp/server.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/server.el Mon Jul 11 20:29:09 1994 +0000 +++ b/lisp/server.el Mon Jul 11 20:36:53 1994 +0000 @@ -147,6 +147,9 @@ (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))))