# HG changeset patch # User Glenn Morris # Date 1175754582 0 # Node ID 417f62c55294f343daca11b654b6d461f35651e8 # Parent 1842898590aee24356f589631db901253f469274 Seed RNG on loading. diff -r 1842898590ae -r 417f62c55294 lisp/play/5x5.el --- a/lisp/play/5x5.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/5x5.el Thu Apr 05 06:29:42 2007 +0000 @@ -519,6 +519,8 @@ (y-or-n-p prompt) t)) +(random t) + (provide '5x5) ;;; arch-tag: ec4dabd5-572d-41ea-b48c-ec5ce0d68fa9 diff -r 1842898590ae -r 417f62c55294 lisp/play/animate.el --- a/lisp/play/animate.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/animate.el Thu Apr 05 06:29:42 2007 +0000 @@ -189,6 +189,8 @@ (animate-string "my sunshine" 18 34) (animate-string "to stay!" 19 34)) +(random t) + (provide 'animate) ;;; arch-tag: 275289a3-6ac4-41da-b527-a1147045392f diff -r 1842898590ae -r 417f62c55294 lisp/play/dissociate.el --- a/lisp/play/dissociate.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/dissociate.el Thu Apr 05 06:29:42 2007 +0000 @@ -99,6 +99,8 @@ (funcall search-function overlap opoint t)))))) (sit-for 0)))) +(random t) + (provide 'dissociate) ;;; arch-tag: 90d197d1-409b-45c5-a0b5-fbfb2e06334f diff -r 1842898590ae -r 417f62c55294 lisp/play/doctor.el --- a/lisp/play/doctor.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/doctor.el Thu Apr 05 06:29:42 2007 +0000 @@ -1657,6 +1657,8 @@ (defun doctor-chat () (doctor-type (doc$ chatlst))) +(random t) + (provide 'doctor) ;; arch-tag: 579380f6-4902-4ea5-bccb-6339e30e1257 diff -r 1842898590ae -r 417f62c55294 lisp/play/gomoku.el --- a/lisp/play/gomoku.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/gomoku.el Thu Apr 05 06:29:42 2007 +0000 @@ -1209,6 +1209,8 @@ (move-to-column (+ gomoku-x-offset (* gomoku-square-width (1- gomoku-board-width))))) +(random t) + (provide 'gomoku) ;;; arch-tag: b1b8205e-77fc-4597-b373-3ea2c04311eb diff -r 1842898590ae -r 417f62c55294 lisp/play/landmark.el --- a/lisp/play/landmark.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/landmark.el Thu Apr 05 06:29:42 2007 +0000 @@ -1705,6 +1705,8 @@ ;;;allout-layout: (0 : -1 -1 0) ;;;End: +(random t) + (provide 'landmark) ;;; arch-tag: ae5031be-96e6-459e-a3df-1df53117d3f2 diff -r 1842898590ae -r 417f62c55294 lisp/play/tetris.el --- a/lisp/play/tetris.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/tetris.el Thu Apr 05 06:29:42 2007 +0000 @@ -652,6 +652,8 @@ (tetris-mode) (tetris-start-game)) +(random t) + (provide 'tetris) ;;; arch-tag: fb780d53-3ff0-49f0-8e19-f7f13cf2d49e diff -r 1842898590ae -r 417f62c55294 lisp/play/zone.el --- a/lisp/play/zone.el Thu Apr 05 06:29:19 2007 +0000 +++ b/lisp/play/zone.el Thu Apr 05 06:29:42 2007 +0000 @@ -692,6 +692,7 @@ (life (or zone-pgm-random-life-wait (random 4))) (kill-buffer nil)))) +(random t) ;;;;;;;;;;;;;;; (provide 'zone)