summaryrefslogtreecommitdiff
path: root/chess-network.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2002-04-18 18:30:19 +0000
committerJohn Wiegley <johnw@newartisans.com>2002-04-18 18:30:19 +0000
commit563cf2037068f67f6786172b029363aaa7d52776 (patch)
tree549c69928ccc019093fed062f6999462fbb431db /chess-network.el
parent2b0db13d4cdc3aaadd7dd458c1097c668577a072 (diff)
Many efficiency improvements and bug fixes.
Diffstat (limited to 'chess-network.el')
-rw-r--r--chess-network.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/chess-network.el b/chess-network.el
index 05df3dc..2cec4ec 100644
--- a/chess-network.el
+++ b/chess-network.el
@@ -151,6 +151,8 @@
(chess-engine-send nil "illegal\n"))
((eq event 'move)
+ (if (= 1 (chess-game-index game))
+ (chess-game-set-tag game "Black" chess-engine-opponent-name))
(chess-engine-send nil (concat (chess-ply-to-algebraic (car args)) "\n"))
(if (chess-game-over-p game)
(chess-game-set-data game 'active nil))))))