From 22b47d6e2731685cf0f2618499fa772c26328482 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Wed, 1 May 2002 22:19:10 +0000 Subject: *** no comment *** --- chess-ics.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'chess-ics.el') diff --git a/chess-ics.el b/chess-ics.el index 3889842..8d35afa 100644 --- a/chess-ics.el +++ b/chess-ics.el @@ -74,6 +74,11 @@ The format of each entry is: (funcall chess-engine-response-handler 'accept))))) (cons "<12> \\(.+\\)" 'chess-ics-handle-move) + (cons "\\S-+ would like to take back \\([0-9]+\\) half move(s)." + (function + (lambda () + (funcall chess-engine-response-handler 'undo + (string-to-int (match-string 1)))))) (cons "\\S-+ accepts the takeback request\\." (function (lambda () -- cgit v1.2.3