[bknr-cvs] r2283 - branches/trunk-reorg/bknr/datastore/src/data

[bknr at bknr.net]

Author: hhubner
Date: 2007-11-15 09:10:11 -0500 (Thu, 15 Nov 2007)
New Revision: 2283

Modified:
   branches/trunk-reorg/bknr/datastore/src/data/txn.lisp
Log:
Remove redundant call to ensure-store-random-state


Modified: branches/trunk-reorg/bknr/datastore/src/data/txn.lisp
===================================================================
--- branches/trunk-reorg/bknr/datastore/src/data/txn.lisp	2007-11-15 07:42:51 UTC (rev 2282)
+++ branches/trunk-reorg/bknr/datastore/src/data/txn.lisp	2007-11-15 14:10:11 UTC (rev 2283)
@@ -79,7 +79,6 @@
   (setf *store* store)
   (let ((store-existed-p (probe-file (store-current-directory store))))
     (ensure-store-current-directory store)
-    (ensure-store-random-state store)
     (dolist (subsystem (store-subsystems store))
       (when *store-debug*
 	(format *trace-output* "Initializing subsystem ~A of ~A~%" subsystem store))