summaryrefslogtreecommitdiff
path: root/chess-gnuchess.el
diff options
context:
space:
mode:
Diffstat (limited to 'chess-gnuchess.el')
-rw-r--r--chess-gnuchess.el5
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)