diff options
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 4c6c259..125bccb 100644 --- a/chess-engine.el +++ b/chess-engine.el @@ -58,7 +58,7 @@ ((eq event 'move) (chess-engine-do-move (car args))))) -(defun chess-engine-create (module &optional user-handler) +(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")))) @@ -67,7 +67,7 @@ chess-engine-event-handler handler chess-engine-response-handler (or 'chess-engine-default-handler user-handler)) - (let ((proc (funcall handler 'initialize))) + (let ((proc (apply handler 'initialize args))) (when (processp proc) (unless (memq (process-status proc) '(run open)) (error "Failed to start chess engine process")) |