diff options
author | Richard M. Stallman <rms@gnu.org> | 2002-12-02 15:50:03 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2002-12-02 15:50:03 +0000 |
commit | 541332e2e159e44e10c10fa0efc8e32e87d0d543 (patch) | |
tree | f82797fd96141bfd3aad5587578407ed30e00d40 | |
parent | ac725ef3dfbb1ea3f112ed49dc8dedffb8d3e0da (diff) | |
download | emacs-541332e2e159e44e10c10fa0efc8e32e87d0d543.tar.gz |
(server-buffer-done): Test of server-existing-buffer was backwards.
-rw-r--r-- | lisp/server.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/server.el b/lisp/server.el index 8683f02d139..2bb528c874b 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -399,9 +399,8 @@ or nil. KILLED is t if we killed BUFFER (unless for-killing (when (and (not killed) server-kill-new-buffers - (save-excursion - (set-buffer buffer) - server-existing-buffer)) + (with-current-buffer buffer + (not server-existing-buffer))) (setq killed t) (bury-buffer buffer) (kill-buffer buffer)) |