diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-19 07:53:38 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-19 07:53:38 +0000 |
| commit | 4e0af8d85ed9c1c8feb025abafe2dba87604ccb5 (patch) | |
| tree | 5f1c83d3829350475e41abb3d3d5647f3dc276e6 /chess-engine.el | |
| parent | 5e7133d9e7a77ea970f5ba1cbf60fe5a2d26cf17 (diff) | |
Fixes and other work.
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/chess-engine.el b/chess-engine.el index 050b29d..826b9e2 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -254,7 +254,15 @@ t)) ((eq event 'illegal) - (chess-message 'opp-illegal))))) + (chess-message 'opp-illegal)) + + ((eq event 'kibitz) + (let ((chess-engine-handling-event t)) + (chess-game-run-hooks game 'kibitz (car args)))) + + ((eq event 'chat) + (let ((chess-engine-handling-event t)) + (chess-game-run-hooks game 'chat (car args))))))) (defun chess-engine-create (module game &optional response-handler &rest handler-ctor-args) |