Mercurial > emacs
changeset 48069:518adc9496ed
(server-switch-buffer): Say when no server buffers remain.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 29 Oct 2002 18:17:46 +0000 |
| parents | 0560d7169eba |
| children | 272d4a04afac |
| files | lisp/server.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- 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.