Commit ef744119 authored by Pip Cet's avatar Pip Cet Committed by Paul Eggert

Fix list-processes typo with thread-name

* lisp/simple.el (list-processes--refresh):
Don’t assume thread-name succeeds (Bug#36163).
parent c42c4e9c
Pipeline #1993 failed with stage
in 6 seconds
......@@ -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 "--")))
(if (memq type '(network serial))
(let ((contact (process-contact p t)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment