From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 14 May 1997 18:42:57 +0000 (+0000)
Subject: (server-kill-buffer): Act only when there is a server process.
X-Git-Tag: emacs-20.1~2144
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1da54e584e2784729fde2bce013e087ff0e3738a;p=emacs.git

(server-kill-buffer): Act only when there is a server process.
---

diff --git a/lisp/server.el b/lisp/server.el
index 8a548fe0aa9..e827e884311 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -387,7 +387,8 @@ or nil.  KILLED is t if we killed the BUFFER (because it was a temp file)."
 ;; When a buffer is killed, inform the clients.
 (add-hook 'kill-buffer-hook 'server-kill-buffer)
 (defun server-kill-buffer ()
-  (server-buffer-done (current-buffer) t))
+  (when server-process
+    (server-buffer-done (current-buffer) t)))
 
 (defun server-edit (&optional arg)
   "Switch to next server editing buffer; say \"Done\" for current buffer.