# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1483888857 0
# Node ID 15a44ba697c4f391ecc66fe3d6f41aabedd6744a
# Parent  d61f3224d0dca74f10248780edfbee647e5d27b4
Seed the damn RNG

diff -r d61f3224d0dc -r 15a44ba697c4 src/main.lisp
--- a/src/main.lisp	Sun Jan 08 14:14:28 2017 +0000
+++ b/src/main.lisp	Sun Jan 08 15:20:57 2017 +0000
@@ -584,6 +584,7 @@
 
 ;;;; Main ---------------------------------------------------------------------
 (defun main ()
+  (setf *random-state* (make-random-state t))
   (charms:with-curses ()
     (charms:disable-echoing)
     (charms:enable-raw-input :interpret-control-characters t)