From ef744119a7cbd0692c53704604e9bb6345c371b6 Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Tue, 11 Jun 2019 08:24:55 -0700 Subject: [PATCH] Fix list-processes typo with thread-name MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit * lisp/simple.el (list-processes--refresh): Don’t assume thread-name succeeds (Bug#36163). --- lisp/simple.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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))) -- 2.39.2