diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-12 07:58:22 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-12 07:58:22 +0000 |
| commit | e66b028def9af45cc545c973255df42c9b90cde1 (patch) | |
| tree | b4d7bf33b4aabfee075ff211e3da12456fbeaf70 /chess-ics.el | |
| parent | cdba8a5aed3bd66e62f348a7064acece342bb68e (diff) | |
optimizations and bug fixes
Diffstat (limited to 'chess-ics.el')
| -rw-r--r-- | chess-ics.el | 5 |
1 files changed, 4 insertions, 1 deletions
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 |