(save-buffers-kill-terminal): Args for

server-save-buffers-kill-terminal changed.

1 files changed, 3 insertions, 6 deletions

diff --git a/lisp/files.el b/lisp/files.el
index 6e95dfc34c6..e846d5d2ba4 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -5731,12 +5731,9 @@ With prefix ARG, silently save all file-visiting buffers, then kill.
 If emacsclient was started with a list of filenames to edit, then
 only these files will be asked to be saved."
   (interactive "P")
-  (let ((proc (frame-parameter (selected-frame) 'client))
-        (frame (selected-frame)))
-    (if (null proc)
-        (save-buffers-kill-emacs)
-      (server-save-buffers-kill-terminal proc arg))))
-
+  (if (frame-parameter (selected-frame) 'client)
+      (server-save-buffers-kill-terminal arg)
+    (save-buffers-kill-emacs arg)))
 
 ;; We use /: as a prefix to "quote" a file name
 ;; so that magic file name handlers will not apply to it.