[Top][All Lists]

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

[elpa] externals/gnugo 88620df 278/357: [gnugo int] Decruft: Drop :local

From: Stefan Monnier
Subject: [elpa] externals/gnugo 88620df 278/357: [gnugo int] Decruft: Drop :local-xpms support.
Date: Sun, 29 Nov 2020 14:51:39 -0500 (EST)

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

    [gnugo int] Decruft: Drop :local-xpms support.
    * packages/gnugo/gnugo.el (gnugo-describe-internal-properties): ...here.
    (gnugo-toggle-image-display): Don't consult :local-xpms.
 gnugo.el | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/gnugo.el b/gnugo.el
index 61ef95f..7020241 100644
--- a/gnugo.el
+++ b/gnugo.el
@@ -321,7 +321,7 @@ Handle the big, slow-to-render, and/or uninteresting ones 
           using (hash-values val)
           do (push (cons key
                          (case key
-                           ((:xpms :local-xpms)
+                           ((:xpms)
                             (format "hash: %X (%d images)"
                                     (sxhash val)
                                     (length val)))
@@ -522,10 +522,9 @@ when you are sure the command cannot fail."
 (defun gnugo-toggle-image-display ()
   (unless (display-images-p)
     (user-error "Display does not support images, sorry"))
-  (let ((fresh (or (gnguo-get :local-xpms)
-                   (if (functionp gnugo-xpms)
-                       (funcall gnugo-xpms (gnugo-get :SZ))
-                     gnugo-xpms))))
+  (let ((fresh (if (functionp gnugo-xpms)
+                   (funcall gnugo-xpms (gnugo-get :SZ))
+                 gnugo-xpms)))
     (unless fresh
       (user-error "Sorry, `gnugo-xpms' unset"))
     (unless (eq fresh (gnugo-get :xpms))

reply via email to

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