# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1005621263 0
# Node ID cb428483fb22086036b7c37fad9c8c8d626e6d2b
# Parent  fa679d186a7d5ba195be4176cb9c7bf49647bff4
(server-edit, server-done): Doc fix.

diff -r fa679d186a7d -r cb428483fb22 lisp/server.el
--- a/lisp/server.el	Tue Nov 13 02:22:40 2001 +0000
+++ b/lisp/server.el	Tue Nov 13 03:14:23 2001 +0000
@@ -427,10 +427,11 @@
 
 (defun server-done ()
   "Offer to save current buffer, mark it as \"done\" for clients.
-This buries the buffer, then returns a list of the form (NEXT-BUFFER KILLED).
-NEXT-BUFFER is another server buffer, as a suggestion for what to select next,
-or nil.  KILLED is t if we killed BUFFER
-\(typically, because it was visiting a temp file)."
+This kills or buries the buffer, then returns a list
+of the form (NEXT-BUFFER KILLED).  NEXT-BUFFER is another server buffer,
+as a suggestion for what to select next, or nil.
+KILLED is t if we killed BUFFER, which happens if it was created
+specifically for the clients and did not exist before their request for it."
   (let ((buffer (current-buffer)))
     (if server-buffer-clients
 	(progn
@@ -488,6 +489,7 @@
 (defun server-edit (&optional arg)
   "Switch to next server editing buffer; say \"Done\" for current buffer.
 If a server buffer is current, it is marked \"done\" and optionally saved.
+The buffer is also killed if it did not exist before the clients asked for it.
 When all of a client's buffers are marked as \"done\", the client is notified.
 
 Temporary files such as MH <draft> files are always saved and backed up,