diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2010-10-02 20:03:44 -0400 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2010-10-02 20:03:44 -0400 |
commit | 2a847524ab57b1b3d6eaa7e12b96be52dbb79509 (patch) | |
tree | 71a772d5f8313472005ad8865d72b5c2f871be04 /lisp/server.el | |
parent | 3ecb8d931af361c043e240a17b18e4f3bcaf0d30 (diff) | |
download | emacs-2a847524ab57b1b3d6eaa7e12b96be52dbb79509.tar.gz |
* lisp/server.el (server-process-filter, server-return-error): Give
emacsclient time to shut down after receiving an error string.
* etc/NEWS: Document tweak to emacsclient exit status.
Diffstat (limited to 'lisp/server.el')
-rw-r--r-- | lisp/server.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/server.el b/lisp/server.el index 0f1b0219a2c..e661f055e1a 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -876,6 +876,9 @@ The following commands are accepted by the client: (server-log "Authentication failed" proc) (server-send-string proc (concat "-error " (server-quote-arg "Authentication failed"))) + ;; Before calling `delete-process', give emacsclient time to + ;; receive the error string and shut down on its own. + (sit-for 1) (delete-process proc) ;; We return immediately (return-from server-process-filter))) @@ -1129,6 +1132,9 @@ The following commands are accepted by the client: proc (concat "-error " (server-quote-arg (error-message-string err)))) (server-log (error-message-string err) proc) + ;; Before calling `delete-process', give emacsclient time to + ;; receive the error string and shut down on its own. + (sit-for 5) (delete-process proc))) (defun server-goto-line-column (line-col) |