From ffdd27965e92a992dba4e752c48f4591359960ff Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 13 Apr 1997 06:12:34 +0000 Subject: [PATCH] (server-done): If buffer visits no file, don't offer save. --- lisp/server.el | 1 + 1 file changed, 1 insertion(+) 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))))) -- 2.39.5