From 3726838a9cca22d420036cd2462398f54318f5d5 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 8 Apr 2011 20:08:17 +0300 Subject: [PATCH] Bail out from list-processes if async subprocesses aren't available. lisp/simple.el (list-processes): If async subprocesses are not available, error out with a clear error message. --- lisp/ChangeLog | 5 +++++ lisp/simple.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d17c98103a0..d93dd27477a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2011-04-08 Eli Zaretskii + + * simple.el (list-processes): If async subprocesses are not + available, error out with a clear error message. + 2011-04-08 Chong Yidong * help.el (help-form-show): New function, to be called from C. diff --git a/lisp/simple.el b/lisp/simple.el index a9a5b50283b..f0560c48a3b 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2769,6 +2769,8 @@ Optional argument BUFFER specifies a buffer to use, instead of \"*Process List\". The return value is always nil." (interactive) + (or (fboundp 'process-list) + (error "Asynchronous subprocesses are not supported on this system")) (unless (bufferp buffer) (setq buffer (get-buffer-create "*Process List*"))) (with-current-buffer buffer -- 2.39.2