[elpa] externals/gnugo 95f956e: Improve scoring seed randomization

[Paul Eggert]

branch: externals/gnugo
commit 95f956ef95468b0d8ed7d5f3f48ff4a311c7e12d
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>

    Improve scoring seed randomization
    
    * packages/gnugo/gnugo.el (gnugo-close-game):
    Use more-random scoring seed.
---
 gnugo.el | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/gnugo.el b/gnugo.el
index dd5baea..6ddb519 100644
--- a/gnugo.el
+++ b/gnugo.el
@@ -849,11 +849,7 @@ For all other values of RSEL, do nothing and return nil."
 
 (defun gnugo-close-game (end-time resign)
   (gnugo-put :game-end-time end-time)
-  (gnugo-put :scoring-seed
-            (if (fboundp 'time-convert)
-                (logand (time-convert end-time 'integer) #xffffff)
-              (let ((now (or end-time (current-time))))
-                (logior (ash (logand (car now) 255) 16) (cadr now)))))
+  (gnugo-put :scoring-seed (logand (random t) #xffffff))
   (gnugo-put :game-over
     (cl-flet
         ;; Q: What form does a game-over "group" take?