diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-09 23:18:35 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-09 23:18:35 +0000 |
| commit | cdcddcb50f516cae6dbe2cd8f484cd16f59dd0bd (patch) | |
| tree | 968340145eac33c294ec6679c225d29f100cab6a /chess-engine.el | |
| parent | 4c79e4f37969528483b3558a231977a1be2d4f51 (diff) | |
*** no comment ***
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/chess-engine.el b/chess-engine.el index 909b7b7..07d7bd6 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -143,8 +143,9 @@ (defun chess-engine-destroy (engine) (let ((buf (or engine (current-buffer)))) - (if (buffer-live-p buf) - (kill-buffer buf)))) + (when (buffer-live-p buf) + (chess-engine-command engine 'destroy) + (kill-buffer buf)))) (defun chess-engine-command (engine event &rest args) (chess-with-current-buffer engine |