diff options
| author | John Wiegley <johnw@newartisans.com> | 2003-01-24 22:14:55 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2003-01-24 22:14:55 +0000 |
| commit | e1ac86bb8064d7528570fc5e44e93bc9b512520d (patch) | |
| tree | 11d8e042590c5ea9edcc9fe10617a50d497e2f59 /chess-engine.el | |
| parent | 90a024f2a28023b1c90cecc7e883856c613404f0 (diff) | |
Add status code to check for open server sockets.
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/chess-engine.el b/chess-engine.el index be4aa64..f3c2f30 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -301,8 +301,8 @@ (or response-handler 'chess-engine-default-handler)) (let ((proc chess-engine-process)) (when (and proc (processp proc)) - (unless (memq (process-status proc) '(run open)) - (chess-error 'failed-engine-start)) + (unless (memq (process-status proc) '(run open listen)) + (chess-error 'failed-start)) (unless (process-filter proc) (set-process-filter proc 'chess-engine-filter))) (setq chess-engine-current-marker (point-marker)) |