diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-22 19:23:45 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-22 19:23:45 +0000 |
| commit | 62c13bcfa1933274be856ac5840a933bbaca5f27 (patch) | |
| tree | 81e2d4ab1a749a4d2561e824708abd60a04d67d0 /chess-engine.el | |
| parent | 171cc1aceb0e9acafe329ff6cd0ca1e2852876ce (diff) | |
Bug fixes and reducing the TODO list.
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 10 |
1 files changed, 6 insertions, 4 deletions
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 |