diff options
| author | Pip Cet <pipcet@gmail.com> | 2019-06-11 08:24:55 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-06-11 08:25:21 -0700 |
| commit | ef744119a7cbd0692c53704604e9bb6345c371b6 (patch) | |
| tree | 92848a156ec24430787a27647bb598cc1b6df9d1 /lisp | |
| parent | c42c4e9c56794e6d658ee2164dd11cce2ee03d1a (diff) | |
| download | emacs-ef744119a7cbd0692c53704604e9bb6345c371b6.tar.gz | |
Fix list-processes typo with thread-name
* lisp/simple.el (list-processes--refresh):
Don’t assume thread-name succeeds (Bug#36163).
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/simple.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 6bc3bc5304c..5e9d13f9f86 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -4102,7 +4102,8 @@ Also, delete any process that is exited or signaled." (null (process-thread p)) (not (fboundp 'thread-name))) "--") ((eq (process-thread p) main-thread) "Main") - ((thread-name (process-thread p))))) + ((thread-name (process-thread p))) + (t "--"))) (cmd (if (memq type '(network serial)) (let ((contact (process-contact p t))) |