about summary refs log tree commit diff
path: root/web/panettone/src/panettone.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'web/panettone/src/panettone.lisp')
-rw-r--r--web/panettone/src/panettone.lisp6
1 files changed, 5 insertions, 1 deletions
diff --git a/web/panettone/src/panettone.lisp b/web/panettone/src/panettone.lisp
index 827f00f40790..b654dc1d6a87 100644
--- a/web/panettone/src/panettone.lisp
+++ b/web/panettone/src/panettone.lisp
@@ -158,7 +158,11 @@ updated issue"
 (defun initialize-persistence (data-dir)
   "Initialize the Panettone persistence system, storing data in DATA-DIR"
   (ensure-directories-exist data-dir)
-  (setq *p-system* (cl-prevalence:make-prevalence-system data-dir))
+  (setq *p-system*
+        (cl-prevalence:make-prevalence-system
+         (concatenate 'string
+                      data-dir
+                      "/snapshot.xml")))
 
 
   (when (null (list-issues *p-system*))