From e66b028def9af45cc545c973255df42c9b90cde1 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Fri, 12 Apr 2002 07:58:22 +0000 Subject: optimizations and bug fixes --- chess-ics.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'chess-ics.el') diff --git a/chess-ics.el b/chess-ics.el index e4d4464..6b93559 100644 --- a/chess-ics.el +++ b/chess-ics.el @@ -61,6 +61,8 @@ who is black." (chess-pos-set-can-castle position ?q t)) (setq parts (cdr parts)) + ;; jww (2002-04-11): How is check indicated? + ;; unknown (setq parts (cdr parts)) (setq parts (cdr parts)) @@ -180,7 +182,8 @@ who is black." ((eq event 'match) (setq chess-engine-pending-offer 'match) - (chess-engine-send nil (format "match %s\n" (car args)))) + (chess-engine-send nil (format "match %s\n" + (read-string "Whom would you like challenge? ")))) ((eq event 'move) (unless chess-ics-ensure-ics12 -- cgit v1.2.3