bug#33629: 27.0.50; Emacs built --without-threads signals (void-function thread-name) when `save-buffers-kill-terminal'

[Eli Zaretskii]

> From: İ. Göktuğ Kayaalp
>       <self@gkayaalp.com>
> Date: Wed, 05 Dec 2018 18:37:26 +0300
> 
> 
> Reproduce w/ emacs -Q
> 
> M-x shell
> M-x toggle-debug-on-error (optionally)
> C-x C-c
> 
> The stack trace:
> 
> Debugger entered--Lisp error: (void-function thread-name)
>   (thread-name #<thread 0xc453a0>)
>   (list-processes--refresh)
>   (list-processes t)

Does the patch below fix the problem?

diff --git a/lisp/simple.el b/lisp/simple.el
index e192238..db59b9f 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4006,7 +4006,9 @@ list-processes--refresh
                  (tty (or (process-tty-name p) "--"))
                  (thread
                    (cond
-                    ((null (process-thread p)) "--")
+                    ((or
+                      (null (process-thread p))
+                      (not (fboundp 'thread-name))) "--")
                     ((eq (process-thread p) main-thread) "Main")
                     ((thread-name (process-thread p)))))
                  (cmd