diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-14 23:07:06 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-14 23:07:06 +0000 |
| commit | db5b94f367aebaeb019b46b2e2feb9f366d5d964 (patch) | |
| tree | 51fcd68cc026f631a7a50efa8795be46d340469d /chess-engine.el | |
| parent | 4aa1c73a2e77af7bcf1bd24837c9f07488068cdd (diff) | |
*** no comment ***
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/chess-engine.el b/chess-engine.el index be48270..ed80570 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -266,7 +266,8 @@ (with-current-buffer (generate-new-buffer " *chess-engine*") (setq buffer (current-buffer)) (let ((proc (apply handler 'initialize handler-ctor-args))) - (when proc ;must be a process or t + (if (null proc) ; must be a process or t + (kill-buffer buffer) (add-hook 'kill-buffer-hook 'chess-engine-on-kill nil t) (setq chess-engine-regexp-alist (symbol-value regexp-alist) chess-engine-event-handler handler |