diff options
| author | Lars Ingebrigtsen | 2019-09-20 20:19:28 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-09-20 20:19:28 +0200 |
| commit | b8e9baac9ada62c2ea7437579df4be9d4f437fda (patch) | |
| tree | 6b91ed5b5a4f48bb47e7e12e7dc42d7d2e07fb59 /lisp | |
| parent | 385bb140de767ff59b026f5540e0e8bfae53fb55 (diff) | |
| download | emacs-b8e9baac9ada62c2ea7437579df4be9d4f437fda.tar.gz emacs-b8e9baac9ada62c2ea7437579df4be9d4f437fda.zip | |
Allow `process-contact' not to block
* doc/lispref/processes.texi (Process Information): Document it.
* lisp/simple.el (list-processes--refresh): Don't wait for contact
information for non-setup processes.
* src/process.c (Fprocess_contact): Take an optional parameter to
avoid blocking (bug#37408).
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 358b6a4f200..a267200aeb9 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -4107,7 +4107,7 @@ Also, delete any process that is exited or signaled." | |||
| 4107 | (t "--"))) | 4107 | (t "--"))) |
| 4108 | (cmd | 4108 | (cmd |
| 4109 | (if (memq type '(network serial)) | 4109 | (if (memq type '(network serial)) |
| 4110 | (let ((contact (process-contact p t))) | 4110 | (let ((contact (process-contact p t t))) |
| 4111 | (if (eq type 'network) | 4111 | (if (eq type 'network) |
| 4112 | (format "(%s %s)" | 4112 | (format "(%s %s)" |
| 4113 | (if (plist-get contact :type) | 4113 | (if (plist-get contact :type) |