diff options
author | Griffin Smith <grfn@gws.fyi> | 2020-07-23T22·27-0400 |
---|---|---|
committer | glittershark <grfn@gws.fyi> | 2020-07-23T22·30+0000 |
commit | d8a0bd9e75876d04642aba450a724dc426f3f4b8 (patch) | |
tree | c8b0d21d9be0f46e26945d6e4801452a99f23cbe /web | |
parent | bd3c19320a57d116670377f4d331ad8e26c1c09c (diff) |
fix(web/panettone): Put snapshot in the right place r/1445
For some reason cl-prevalence tries to put the snapshot in the *parent directory* of the directory that's passed to make-prevalence-system. This is icky, but this should work around it Fixes: #2 Fixes: #3 Fixes: #4 Change-Id: I8300246275887653586108cd7b3b033df3bca203 Reviewed-on: https://cl.tvl.fyi/c/depot/+/1401 Tested-by: BuildkiteCI Reviewed-by: isomer <isomer@tvl.fyi>
Diffstat (limited to 'web')
-rw-r--r-- | web/panettone/src/panettone.lisp | 6 |
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*)) |