Mercurial > emacs

changeset 413:50ee23d51f15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Richard M. Stallman <rms@gnu.org>
date Tue, 03 Sep 1991 00:29:34 +0000
parents 3cc2c5136064
children 4c9349866dac
files lisp/server.el
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/server.el	Mon Sep 02 20:23:32 1991 +0000
+++ b/lisp/server.el	Tue Sep 03 00:29:34 1991 +0000
@@ -130,6 +130,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))))