From 62c13bcfa1933274be856ac5840a933bbaca5f27 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 22 Apr 2002 19:23:45 +0000 Subject: Bug fixes and reducing the TODO list. --- chess-engine.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'chess-engine.el') diff --git a/chess-engine.el b/chess-engine.el index 826b9e2..315856a 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -6,9 +6,6 @@ ;;; Commentary: (require 'chess-module) -(require 'chess-game) -(require 'chess-algebraic) -(require 'chess-fen) (defgroup chess-engine nil "Code for reading movements and other commands from an engine." @@ -256,6 +253,10 @@ ((eq event 'illegal) (chess-message 'opp-illegal)) + ((eq event 'call-flag) + ;; jww (2002-04-21): what to do here? + ) + ((eq event 'kibitz) (let ((chess-engine-handling-event t)) (chess-game-run-hooks game 'kibitz (car args)))) @@ -321,7 +322,8 @@ (chess-game-set-start-position chess-module-game chess-starting-position) (chess-game-set-data chess-module-game 'my-color t)) - (chess-game-set-data chess-module-game 'active t)))) + (chess-game-set-data chess-module-game 'active t)) + (chess-game-run-hooks chess-module-game 'orient))) (defun chess-engine-position (engine) (chess-with-current-buffer engine -- cgit v1.2.3