eschulte pushed a commit to branch go
in repository elpa.
commit 92d844c8a4447b24a48d360e6b4357e753efda3d
Author: Eric Schulte <[email protected]>
Date: Mon May 20 18:58:53 2013 -0600
print score after marking territory
---
go-board.el | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/go-board.el b/go-board.el
index cec8b21..ca731c8 100644
--- a/go-board.el
+++ b/go-board.el
@@ -398,13 +398,13 @@
(setf *turn* (other-color *turn*))
(when *autoplay*
(when (equalp :pass (go-board-next))
- (message "final score: %s" (with-backends back (go-score back)))
(mapc (lambda (move)
(go-board-mark-point (point-of-pos (cddr move))
(go-board-cross (ecase (car move)
(:B 'black)
(:W 'white)))))
- (with-backends back (go-territory back)))))))
+ (with-backends back (go-territory back)))
+ (message "final score: %s" (with-backends back (go-score back)))))))
(defun go-board-undo (&optional num)
(interactive "p")