diff options
| author | Glenn Morris <rgm@gnu.org> | 2007-04-05 06:29:42 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2007-04-05 06:29:42 +0000 |
| commit | d5d20127664d5c3cc3442e42a9a91cd236e35302 (patch) | |
| tree | 8c419095cdd46d654b55ead0afb7374f51286270 /lisp/play | |
| parent | 09dac40343020c9aebab9614ae4ab4e942094173 (diff) | |
| download | emacs-d5d20127664d5c3cc3442e42a9a91cd236e35302.tar.gz | |
Seed RNG on loading.
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/5x5.el | 2 | ||||
| -rw-r--r-- | lisp/play/animate.el | 2 | ||||
| -rw-r--r-- | lisp/play/dissociate.el | 2 | ||||
| -rw-r--r-- | lisp/play/doctor.el | 2 | ||||
| -rw-r--r-- | lisp/play/gomoku.el | 2 | ||||
| -rw-r--r-- | lisp/play/landmark.el | 2 | ||||
| -rw-r--r-- | lisp/play/tetris.el | 2 | ||||
| -rw-r--r-- | lisp/play/zone.el | 1 |
8 files changed, 15 insertions, 0 deletions
diff --git a/lisp/play/5x5.el b/lisp/play/5x5.el index 5dad84fadc5..5cf0c37fb62 100644 --- a/lisp/play/5x5.el +++ b/lisp/play/5x5.el @@ -519,6 +519,8 @@ in progress because it is an animated attempt." (y-or-n-p prompt) t)) +(random t) + (provide '5x5) ;;; arch-tag: ec4dabd5-572d-41ea-b48c-ec5ce0d68fa9 diff --git a/lisp/play/animate.el b/lisp/play/animate.el index 1ac134bcd6b..9d180a5f338 100644 --- a/lisp/play/animate.el +++ b/lisp/play/animate.el @@ -189,6 +189,8 @@ You can specify the one's name by NAME; the default value is \"Sarah\"." (animate-string "my sunshine" 18 34) (animate-string "to stay!" 19 34)) +(random t) + (provide 'animate) ;;; arch-tag: 275289a3-6ac4-41da-b527-a1147045392f diff --git a/lisp/play/dissociate.el b/lisp/play/dissociate.el index 8f88bdb9788..1c0e89e7c7d 100644 --- a/lisp/play/dissociate.el +++ b/lisp/play/dissociate.el @@ -99,6 +99,8 @@ Default is 2." (funcall search-function overlap opoint t)))))) (sit-for 0)))) +(random t) + (provide 'dissociate) ;;; arch-tag: 90d197d1-409b-45c5-a0b5-fbfb2e06334f diff --git a/lisp/play/doctor.el b/lisp/play/doctor.el index cd88b9cb315..4c3cc5b4ce8 100644 --- a/lisp/play/doctor.el +++ b/lisp/play/doctor.el @@ -1657,6 +1657,8 @@ Hack on previous word, setting global variable OWNER to correct result." (defun doctor-chat () (doctor-type (doc$ chatlst))) +(random t) + (provide 'doctor) ;; arch-tag: 579380f6-4902-4ea5-bccb-6339e30e1257 diff --git a/lisp/play/gomoku.el b/lisp/play/gomoku.el index c05a46b90f6..8c04f254a0b 100644 --- a/lisp/play/gomoku.el +++ b/lisp/play/gomoku.el @@ -1209,6 +1209,8 @@ If the game is finished, this command requests for another game." (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 --git a/lisp/play/landmark.el b/lisp/play/landmark.el index 4fe126fec0a..e8d0b21f47d 100644 --- a/lisp/play/landmark.el +++ b/lisp/play/landmark.el @@ -1705,6 +1705,8 @@ Use \\[describe-mode] for more info." ;;;allout-layout: (0 : -1 -1 0) ;;;End: +(random t) + (provide 'landmark) ;;; arch-tag: ae5031be-96e6-459e-a3df-1df53117d3f2 diff --git a/lisp/play/tetris.el b/lisp/play/tetris.el index f1901a129dd..11f6364e609 100644 --- a/lisp/play/tetris.el +++ b/lisp/play/tetris.el @@ -652,6 +652,8 @@ tetris-mode keybindings: (tetris-mode) (tetris-start-game)) +(random t) + (provide 'tetris) ;;; arch-tag: fb780d53-3ff0-49f0-8e19-f7f13cf2d49e diff --git a/lisp/play/zone.el b/lisp/play/zone.el index 05f73b8030a..256a316c3cf 100644 --- a/lisp/play/zone.el +++ b/lisp/play/zone.el @@ -692,6 +692,7 @@ If nil, `zone-pgm-random-life' chooses a value from 0-3 (inclusive).") (life (or zone-pgm-random-life-wait (random 4))) (kill-buffer nil)))) +(random t) ;;;;;;;;;;;;;;; (provide 'zone) |