# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1035915466 0
# Node ID 518adc9496edfe600cfa3d9b579ba3fa12cc5432
# Parent  0560d7169eba04cf5807c2c05537ab4ec8a486fb
(server-switch-buffer): Say when no server buffers remain.

diff -r 0560d7169eba -r 518adc9496ed lisp/server.el
--- a/lisp/server.el	Tue Oct 29 18:12:33 2002 +0000
+++ b/lisp/server.el	Tue Oct 29 18:17:46 2002 +0000
@@ -534,7 +534,8 @@
       (if server-clients
 	  (server-switch-buffer (nth 1 (car server-clients)) killed-one)
 	(unless (or killed-one (window-dedicated-p (selected-window)))
-	  (switch-to-buffer (other-buffer))))
+	  (switch-to-buffer (other-buffer))
+	  (message "No server buffers remain to edit")))
     (if (not (buffer-name next-buffer))
 	;; If NEXT-BUFFER is a dead buffer, remove the server records for it
 	;; and try the next surviving server buffer.