emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] 07/08: [gnugo int] Use ‘gnugo -current-player’ more.


From: Thien-Thi Nguyen
Subject: [elpa] 07/08: [gnugo int] Use ‘gnugo -current-player’ more.
Date: Wed, 23 Apr 2014 09:00:24 +0000

ttn pushed a commit to branch master
in repository elpa.

commit 7140ec824759fe6975f4b0b26029d4683423096c
Author: Thien-Thi Nguyen <address@hidden>
Date:   Tue Apr 22 18:18:24 2014 +0200

    [gnugo int] Use ‘gnugo-current-player’ more.
    
    * packages/gnugo/gnugo.el (gnugo-refresh):
    ...here, obsoleting two local vars, as well.
---
 packages/gnugo/gnugo.el |    6 ++----
 1 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index 32f1147..5f14f7d 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -1425,9 +1425,7 @@ be slow.  (This should normally be unnecessary; specify 
it only if the display
 seems corrupted.)  NOCACHE is silently ignored when GNU Go is thinking about
 its move."
   (interactive "P")
-  (let* ((last-mover (gnugo-get :last-mover))
-         (other (gnugo-other last-mover))
-         (move (gnugo-move-history 'car))
+  (let* ((move (gnugo-move-history 'car))
          (game-over (gnugo-get :game-over))
          (inhibit-read-only t)
          window last)
@@ -1462,7 +1460,7 @@ its move."
                                          ""))
                              (format "%s(%s to play)"
                                      (if move (concat move " ") "")
-                                     other))))
+                                     (gnugo-current-player)))))
     ;; pall of death
     (when game-over
       (let ((live (cdr (assq 'live game-over)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]