diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-06-14 23:41:56 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-06-14 23:41:56 +0000 |
| commit | 36f7cba0c4eb6535f170c7b8957e414dd3b91499 (patch) | |
| tree | 006e030a0254726259e80ad700c8088ce307b6b0 /chess-gnuchess.el | |
| parent | 5badda2b5c155f5afbd238c97d5ca93b075e2ac5 (diff) | |
various small bug fixes
Diffstat (limited to 'chess-gnuchess.el')
| -rw-r--r-- | chess-gnuchess.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/chess-gnuchess.el b/chess-gnuchess.el index 5de6a73..401e14c 100644 --- a/chess-gnuchess.el +++ b/chess-gnuchess.el @@ -41,10 +41,11 @@ (cond ((eq event 'initialize) (let ((proc (chess-common-handler game 'initialize "gnuchess"))) - (when (and (processp proc) + (when (and proc (processp proc) (eq (process-status proc) 'run)) (process-send-string proc "nopost\n") - (setq chess-engine-opponent-name "GnuChess") + (setq chess-engine-process proc + chess-engine-opponent-name "GnuChess") t))) ((eq event 'setup-pos) |