summaryrefslogtreecommitdiff
path: root/lisp/server.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-11-10 16:13:30 +0000
committerRichard M. Stallman <rms@gnu.org>1994-11-10 16:13:30 +0000
commit00dd6ebb61387a31fdfb35e81e8d8c465c12fa0e (patch)
tree464e52bc28d50c67970eb435bb84a94aa0144369 /lisp/server.el
parent45305b41893e318bddda34dbccf7d470dda03c07 (diff)
downloademacs-00dd6ebb61387a31fdfb35e81e8d8c465c12fa0e.tar.gz
Comment change.
Diffstat (limited to 'lisp/server.el')
-rw-r--r--lisp/server.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/server.el b/lisp/server.el
index 2c95453d651..eab345322f8 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -294,9 +294,10 @@ Then bury it, and return a suggested buffer to select next."
(save-buffer buffer)))
(server-buffer-done buffer)))))
-;; If a server buffer is killed, release its client.
-;; I'm not sure this is really a good idea--do you want the client
-;; to proceed using whatever is on disk in that file?
+;; Ask before killing a server buffer.
+;; It was suggested to release its client instead,
+;; but I think that is dangerous--the client would proceed
+;; using whatever is on disk in that file. -- rms.
(defun server-kill-buffer-query-function ()
(or (not server-buffer-clients)
(yes-or-no-p (format "Buffer `%s' still has clients; kill it? "