diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-10 21:34:56 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-10 21:34:56 +0000 |
| commit | fa6fd6dc166f6d333ddb9c94271647956f86598d (patch) | |
| tree | 071db4c0a47e6d89aabb0350b20a3985301ffc1d /chess-engine.el | |
| parent | a827a19a8981fad3e1c5b38d507f06278797ebb4 (diff) | |
handle a move sent to an engine that has no game/position
intelligently. This can be used for receiving moves, but not
recording them.
Diffstat (limited to 'chess-engine.el')
| -rw-r--r-- | chess-engine.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/chess-engine.el b/chess-engine.el index 0346229..7c35bd7 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -178,7 +178,7 @@ (chess-game-set-data game 'active t)) (chess-game-run-hooks game 'orient))))) -(defun chess-engine-create (module &optional response-handler &rest args) +(defun chess-engine-create (module &optional user-handler &rest args) (let ((regexp-alist (intern-soft (concat (symbol-name module) "-regexp-alist"))) (handler (intern-soft (concat (symbol-name module) "-handler")))) @@ -187,7 +187,7 @@ (setq chess-engine-regexp-alist (symbol-value regexp-alist) chess-engine-event-handler handler chess-engine-response-handler - (or response-handler 'chess-engine-default-handler)) + (or user-handler 'chess-engine-default-handler)) (when (processp proc) (unless (memq (process-status proc) '(run open)) (error "Failed to start chess engine process")) |