diff options
| -rw-r--r-- | lisp/thread.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/thread.el b/lisp/thread.el index c9f50ff5dba..53208851b78 100644 --- a/lisp/thread.el +++ b/lisp/thread.el @@ -82,6 +82,9 @@ An EVENT has the format (defun list-threads () "Display a list of threads." (interactive) + ;; Threads may not exist, if Emacs was configured --without-threads. + (unless (bound-and-true-p main-thread) + (error "Threads are not supported in this configuration")) ;; Generate the Threads list buffer, and switch to it. (let ((buf (get-buffer-create "*Threads*"))) (with-current-buffer buf |