[elpa] 03/13: [gnugo int] Fix bug: On -l/--infile, don't set :last-mover.

[Thien-Thi Nguyen]

ttn pushed a commit to branch master
in repository elpa.

commit ad9a9cd80b074eff109cf401d1398010317aae9b
Author: Thien-Thi Nguyen <address@hidden>
Date:   Sun Apr 20 17:47:51 2014 +0200

    [gnugo int] Fix bug: On -l/--infile, don't set :last-mover.
    
    Omission from 2014-04-19, "Fix bug:
    Ensure gametree sync for -l/--infile".
    
    * packages/gnugo/gnugo.el (gnugo): ...here.
---
 packages/gnugo/gnugo.el |   11 ++++++-----
 1 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index 256998b..e3c290b 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -2550,11 +2550,12 @@ See `gnugo-board-mode' for a full list of commands."
       (let ((g (gnugo-get :gnugo-color))
             (n (or (gnugo--root-prop :HA) 0))
             (u (gnugo-get :user-color)))
-        (gnugo-put :last-mover
-          (if (or (and (gnugo--blackp u) (< 1 n))
-                  (and (gnugo--blackp g) (< n 2)))
-              u
-            g))
+        (unless (gnugo-get :last-mover)
+          (gnugo-put :last-mover
+            (if (or (and (gnugo--blackp u) (< 1 n))
+                    (and (gnugo--blackp g) (< n 2)))
+                u
+              g)))
         (run-hooks 'gnugo-start-game-hook)
         (when (string= g (gnugo-current-player))
           (gnugo-refresh t)