[elpa] externals/gnugo 08c3378 116/357: [gnugo int] Use ‘gnugo/sgf-create’ more.

[Stefan Monnier]

branch: externals/gnugo
commit 08c3378cdd041b997729e10f3c8007d84353072f
Author: Thien-Thi Nguyen <ttn@gnu.org>
Commit: Thien-Thi Nguyen <ttn@gnu.org>

    [gnugo int] Use ‘gnugo/sgf-create’ more.
    
    * packages/gnugo/gnugo.el (gnugo-board-mode): ...here,
    for uninitialized board setup, instead of manual consing.
---
 gnugo.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/gnugo.el b/gnugo.el
index fe8fde6..c135824 100644
--- a/gnugo.el
+++ b/gnugo.el
@@ -2068,9 +2068,10 @@ In this mode, keys do not self insert.
     (gnugo-put :rparen-ov (let ((ov (make-overlay 1 1)))
                             (overlay-put ov 'display ")")
                             ov))
-    (let ((tree (vector (list (list '(:FF . 4) '(:GM . 1))))))
+    (let* ((coll (gnugo/sgf-create "(;FF[4]GM[1])" t))
+           (tree (car coll)))
       (gnugo-put :sgf-gametree tree)
-      (gnugo-put :sgf-collection (list tree))
+      (gnugo-put :sgf-collection coll)
       (gnugo-put :monkey (vector (aref tree 0) 0 0)))
     (gnugo--SZ! board-size)
     (loop with gb = (gnugo--blackp (gnugo-other user-color))