From e1162166b79947a2e6fe02cb591c7d7b242d3739 Mon Sep 17 00:00:00 2001 From: haskal Date: Sun, 10 Jan 2021 05:37:35 -0500 Subject: [PATCH] fix issue with server projects dir initialization --- crossfire/server.rkt | 2 ++ 1 file changed, 2 insertions(+) diff --git a/crossfire/server.rkt b/crossfire/server.rkt index 8ccfef8..42211d8 100644 --- a/crossfire/server.rkt +++ b/crossfire/server.rkt @@ -130,6 +130,8 @@ ;; cleanly recovers from potential crash situations (define (server-cleanup-unused-files) + (unless (directory-exists? *server-files-path*) + (make-directory* *server-files-path*)) (define existing-ids (mutable-set)) (call-with-transaction (current-db) (lambda () (define (cleanup id exists? path)