diff options
Diffstat (limited to 'chess-glaurung.el')
| -rw-r--r-- | chess-glaurung.el | 13 |
1 files changed, 2 insertions, 11 deletions
diff --git a/chess-glaurung.el b/chess-glaurung.el index 5ce6042..f3ff03e 100644 --- a/chess-glaurung.el +++ b/chess-glaurung.el @@ -34,17 +34,8 @@ :type 'file :group 'chess-glaurung) -(defvar chess-glaurung-regexp-alist - (list - (cons (concat "^bestmove\\s-+\\(" chess-algebraic-regexp "\\)") - (function - (lambda () - (funcall chess-engine-response-handler 'move - (chess-engine-convert-algebraic (match-string 1) t))))) - (cons "^id\\s-+name\\s-+\\(.+\\)$" - (function - (lambda () - (setq-local chess-engine-opponent-name (match-string 1))))))) +(defvar chess-glaurung-regexp-alist chess-uci-regexp-alist + "Patterns used to match engine output.") (defun chess-glaurung-handler (game event &rest args) (unless chess-engine-handling-event |