diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-04-08 08:33:32 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-04-08 08:33:32 +0000 |
| commit | 110d1880915bf26b13a8309419a67bf272b34d4d (patch) | |
| tree | 8f5febc9dbbe7c84f0a8b1e13eb463f47a3a33cf /chess-network.el | |
| parent | b0714ff514de8db1c49d48f18b7a8d25e9cf9200 (diff) | |
*** no comment ***
Diffstat (limited to 'chess-network.el')
| -rw-r--r-- | chess-network.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/chess-network.el b/chess-network.el index 5127055..6ef4126 100644 --- a/chess-network.el +++ b/chess-network.el @@ -31,7 +31,11 @@ (let* ((position (chess-fen-to-pos (match-string 1))) (ply (chess-ply-create position))) (chess-game-set-plies (chess-engine-game nil) - (list ply)))))))) + (list ply)))))) + (cons "QUIT" + (function + (lambda () + (message "Your opponent has quit playing")))))) (defun chess-network-perform-move () (let ((position (chess-engine-position nil)) |