eschulte pushed a commit to branch go
in repository elpa.
commit cfb57a818c6435bd0d5a952c6583a58489da0fb7
Author: Eric Schulte <[email protected]>
Date: Sat Jun 2 19:50:33 2012 -0600
board propagates setf'd moves to trackers
---
go-board.el | 1 +
1 files changed, 1 insertions(+), 0 deletions(-)
diff --git a/go-board.el b/go-board.el
index b843143..4c8540b 100644
--- a/go-board.el
+++ b/go-board.el
@@ -379,6 +379,7 @@
(with-board board
(apply-turn-to-board (list move))
(goto-char (point-of-pos (cddr move)))
+ (mapcar (lambda (tr) (setf (go-move tr) move)) *trackers*)
(setf *turn* (other-color *turn*))))
(defmethod go-labels ((board board))
