From e9568bd14aaeb1a78da525f1b1e2c5669317069d Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 15 Apr 2002 02:45:42 +0000 Subject: *** no comment *** --- chess-engine.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'chess-engine.el') diff --git a/chess-engine.el b/chess-engine.el index 4d9613b..470e1a2 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -113,6 +113,8 @@ (if (chess-game-data chess-engine-game 'my-color) (chess-game-set-data chess-engine-game 'my-color nil))) (chess-game-move chess-engine-game (car args)) + (if (chess-game-over-p chess-engine-game) + (chess-game-set-data chess-engine-game 'active nil)) t)))) ((eq event 'pass) -- cgit v1.2.3