summaryrefslogtreecommitdiff
path: root/lisp/server.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-04-13 06:12:34 +0000
committerRichard M. Stallman <rms@gnu.org>1997-04-13 06:12:34 +0000
commitffdd27965e92a992dba4e752c48f4591359960ff (patch)
tree2d07234254f1d3cc72618fe439ed051f8f4d7f9f /lisp/server.el
parent6811a757a57f886bc9d172164da79903ec901227 (diff)
downloademacs-ffdd27965e92a992dba4e752c48f4591359960ff.tar.gz
(server-done): If buffer visits no file, don't offer save.
Diffstat (limited to 'lisp/server.el')
-rw-r--r--lisp/server.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/server.el b/lisp/server.el
index 78f10f422df..dcd025b3d03 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -353,6 +353,7 @@ or nil. KILLED is t if we killed the BUFFER (because it was a temp file)."
(buffer-backed-up nil))
(save-buffer))
(if (and (buffer-modified-p)
+ buffer-file-name
(y-or-n-p (concat "Save file " buffer-file-name "? ")))
(save-buffer buffer)))
(server-buffer-done buffer)))))