[elpa] 05/13: [gnugo] Fix bug: DTRT for :last-user-bpos in undo-one-move ME-NEXT.

[Thien-Thi Nguyen]

ttn pushed a commit to branch master
in repository elpa.

commit eb497c6c68c71e8db29a14e5a59362a057f291f0
Author: Thien-Thi Nguyen <address@hidden>
Date:   Mon Apr 21 13:33:51 2014 +0200

    [gnugo] Fix bug: DTRT for :last-user-bpos in undo-one-move ME-NEXT.
    
    Omission from 2014-03-11, "Make ‘C-u M-u’ switch roles".
    
    * packages/gnugo/gnugo.el (gnugo-undo-one-move):
    Swizzle colors before calling ‘gnugo-magic-undo’.
---
 packages/gnugo/gnugo.el |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index 81a094d..76e67d2 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -2017,13 +2017,13 @@ move was done by the color you prefer to play:
 See also `gnugo-undo-two-moves'."
   (interactive "P")
   (gnugo-gate)
-  (gnugo-magic-undo 1 t)
   (when me-next
-    (let* ((wait (gnugo-get :last-mover))
-           (play (gnugo-other wait)))
+    (let* ((play (gnugo-get :last-mover))
+           (wait (gnugo-other play)))
       (gnugo--who-is-who wait play (string= play (gnugo-get :user-color)))
       (gnugo-put :user-color play)
-      (gnugo-put :gnugo-color wait))))
+      (gnugo-put :gnugo-color wait)))
+  (gnugo-magic-undo 1 t))
 
 (defun gnugo-undo-two-moves ()
   "Undo a pair of moves (GNU Go's and yours).