Changeset 3542

Timestamp:

07/22/08 10:32:05 (4 months ago)

Author:

ksprotte

Message:

removed (bos.m2.allocation-cache:rebuild-cache) from daily job, cause it is done in snapshot (and wrong to do there anyway - because rebuild-cache is not a transaction, but would need to be logged)

Files:

• trunk/projects/bos/m2/allocation-cache.lisp (modified) (1 diff)
• trunk/projects/bos/web/daily.lisp (modified) (1 diff)

trunk/projects/bos/m2/allocation-cache.lisp

@@ -233 +233 @@
-
-(defun rebuild-cache ()
+  ""
-  (unless *allocation-cache*
-    (setq *allocation-cache* (make-allocation-cache)))

trunk/projects/bos/web/daily.lisp

@@ -8 +8 @@
-  (format t "; snapshotting datastore~%")
-  (snapshot)
-  (format t "; rebuilding allocation-cache~%")
-  (bos.m2.allocation-cache:rebuild-cache)
-  (format t "; running check (consistent-p)~%")
-  (flet ((consistent-p-report ()