# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 977158848 0
# Node ID 7218b9b8c2add0bf37ec3a731ad1dc57ae0aa9d2
# Parent  30465c00cb0d155e3db4ef240683a7b1d4180b2e
(server-buffer-done): Bury the buffer before
killing it.

diff -r 30465c00cb0d -r 7218b9b8c2ad lisp/server.el
--- a/lisp/server.el	Mon Dec 18 15:40:18 2000 +0000
+++ b/lisp/server.el	Mon Dec 18 17:00:48 2000 +0000
@@ -390,6 +390,7 @@
 			   (set-buffer buffer)
 			   server-existing-buffer))
 		(setq killed t)
+		(bury-buffer buffer)
 		(kill-buffer buffer))
 	      (unless killed
 		(if (server-temp-file-p buffer)