comparison lisp/play/doctor.el @ 76953:417f62c55294

Seed RNG on loading.
author Glenn Morris <rgm@gnu.org>
date Thu, 05 Apr 2007 06:29:42 +0000
parents e3694f1cb928
children 527f752989fc 4ef881a120fe
comparison
equal deleted inserted replaced
76952:1842898590ae 76953:417f62c55294
1655 (doctor-type '(yow! are we interactive yet \?))))) 1655 (doctor-type '(yow! are we interactive yet \?)))))
1656 1656
1657 1657
1658 (defun doctor-chat () (doctor-type (doc$ chatlst))) 1658 (defun doctor-chat () (doctor-type (doc$ chatlst)))
1659 1659
1660 (random t)
1661
1660 (provide 'doctor) 1662 (provide 'doctor)
1661 1663
1662 ;; arch-tag: 579380f6-4902-4ea5-bccb-6339e30e1257 1664 ;; arch-tag: 579380f6-4902-4ea5-bccb-6339e30e1257
1663 ;;; doctor.el ends here 1665 ;;; doctor.el ends here