(server-buffer-done): Bury the buffer before

killing it.

(server-buffer-done): Bury the buffer before
killing it.
3d2a0e0b · Gerd Moellmann · 91c9e6ce · 3d2a0e0b · 3d2a0e0b
Commit 3d2a0e0b authored Dec 18, 2000 by Gerd Moellmann
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 0 deletions

lisp/ChangeLog lisp/ChangeLog +3 -0

lisp/server.el lisp/server.el +1 -0

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
 2000-12-18  Gerd Moellmann  <gerd@gnu.org>

+	* server.el (server-buffer-done): Bury the buffer before
+	killing it.
+
 	* faces.el (face-spec-set): Interpret a nil in specs for
 	foreground and background colors as `unspecified', for
 	compatibility with 20.x.

--- a/lisp/server.el
+++ b/lisp/server.el
@@ -390,6 +390,7 @@ or nil.  KILLED is t if we killed BUFFER
 			   (set-buffer buffer)
 			   server-existing-buffer))
 		(setq killed t)
+		(bury-buffer buffer)
 		(kill-buffer buffer))
 	      (unless killed
 		(if (server-temp-file-p buffer)