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

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

parent 0f395759
......@@ -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.
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