summaryrefslogtreecommitdiff
path: root/chess-phalanx.el
diff options
context:
space:
mode:
Diffstat (limited to 'chess-phalanx.el')
-rw-r--r--chess-phalanx.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/chess-phalanx.el b/chess-phalanx.el
index f3b5ffa..3353b67 100644
--- a/chess-phalanx.el
+++ b/chess-phalanx.el
@@ -31,10 +31,11 @@
(cond
((eq event 'initialize)
(let ((proc (chess-common-handler game 'initialize "phalanx")))
- (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 "Phalanx")
+ (setq chess-engine-process proc
+ chess-engine-opponent-name "Phalanx")
t)))
(t