Merge from emacs-24; up to 2012-05-05T02:50:20Z!monnier@iro.umontreal.ca

[gnu-emacs] / lisp / play / blackbox.el

diff --git a/lisp/play/blackbox.el b/lisp/play/blackbox.el
index 4e8790c3586feb5a47b8fd3f8db304b34369d6fc..16189600156aeede8d01fa545166d0347900573c 100644 (file)
--- a/lisp/play/blackbox.el
+++ b/lisp/play/blackbox.el
@@ -259,7 +259,6 @@ a reflection."
   (bb-goto (cons bb-x bb-y)))
 
 (defun bb-init-board (num-balls)
-  (random t)
   (let (board pos)
     (while (>= (setq num-balls (1- num-balls)) 0)
       (while