summaryrefslogtreecommitdiff
path: root/lisp/files.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2009-01-11 16:45:52 +0000
committerChong Yidong <cyd@stupidchicken.com>2009-01-11 16:45:52 +0000
commit0eef14bdd0c18c87df5b54bf2c58c2736ba3a090 (patch)
treef75f813eab4284663d78870c1c2484a9ce3cb336 /lisp/files.el
parentac088d51a00ba59a39c850861e26517609059a3d (diff)
downloademacs-0eef14bdd0c18c87df5b54bf2c58c2736ba3a090.tar.gz
(save-buffers-kill-terminal): Args for
server-save-buffers-kill-terminal changed.
Diffstat (limited to 'lisp/files.el')
-rw-r--r--lisp/files.el9
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.