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

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

[elpa] 01/03: [gnugo int] Avoid superfluous ‘gnugo-other’ call.


From: Thien-Thi Nguyen
Subject: [elpa] 01/03: [gnugo int] Avoid superfluous ‘gnugo-other’ call.
Date: Tue, 29 Apr 2014 09:28:17 +0000

ttn pushed a commit to branch master
in repository elpa.

commit 4951e789f95f67b99fcbab7b921b8051813d91bd
Author: Thien-Thi Nguyen <address@hidden>
Date:   Sun Apr 27 13:54:15 2014 +0200

    [gnugo int] Avoid superfluous ‘gnugo-other’ call.
    
    * packages/gnugo/gnugo.el (gnugo-toggle-abdication): ...here.
---
 packages/gnugo/gnugo.el |    5 ++---
 1 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index bf7b120..d4cc344 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -2304,13 +2304,12 @@ a move to play for you, the thinking is not cancelled 
but instead
 transformed into a move suggestion (see `gnugo-request-suggestion')."
   (interactive)
   (let ((u (gnugo-get :user-color))
-        (last-mover (gnugo-get :last-mover))
         (abd (gnugo-get :abd)))
     (if abd
         ;; disable
         (let* ((gcolor (gnugo-get :gnugo-color))
                (waiting (gnugo-get :waiting))
-               (userp (string= last-mover gcolor)))
+               (userp (string= gcolor (gnugo-get :last-mover))))
           (when (timerp abd)
             (cancel-timer abd))
           (gnugo--forget :abd)
@@ -2330,7 +2329,7 @@ transformed into a move suggestion (see 
`gnugo-request-suggestion')."
       ;; enable
       (gnugo-gate t)
       (gnugo-put :abd t)
-      (gnugo-get-move (gnugo-other last-mover)))
+      (gnugo-get-move u))
     (gnugo--instant-karma u (not abd))))
 
 ;;;---------------------------------------------------------------------------



reply via email to

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