From 6495844c043aeb729c39fdcd8284e461ba8aa2a1 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Fri, 12 Apr 2002 23:00:37 +0000 Subject: bug fixes --- chess-engine.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'chess-engine.el') diff --git a/chess-engine.el b/chess-engine.el index 1dd1022..380803d 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -118,7 +118,9 @@ (format "Do you wish to play a chess game against %s? " (car args)) (format "Do you wish to play a chess game against an anonymous opponent? "))) - (chess-engine-command nil 'accept) + (progn + (chess-game-set-data game 'active t) + (chess-engine-command nil 'accept)) (chess-engine-command nil 'decline))) t) -- cgit v1.2.3