From 6fe3209092928da896f2f5aa7e8bc648efc2e47c Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Fri, 26 Apr 2002 06:03:11 +0000
Subject: *** no comment ***

---
 chess-engine.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/chess-engine.el b/chess-engine.el
index 1ebbd76..2beb35e 100644
--- a/chess-engine.el
+++ b/chess-engine.el
@@ -256,7 +256,8 @@
 
      ((eq event 'illegal)
       (chess-message 'opp-illegal)
-      (chess-game-undo game 1))
+      (let ((chess-engine-handling-event t))
+	(chess-game-undo game 1)))
 
      ((eq event 'call-flag)
       ;; jww (2002-04-21): what to do here?
-- 
cgit v1.2.3