소스 검색

[back] fix db loading on server start

Innocenty Enikeew 7 년 전
부모
커밋
ca6363294f
2개의 변경된 파일4개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 0
      back/.gitignore
  2. 2 1
      back/server.lisp

+ 2 - 0
back/.gitignore

@@ -0,0 +1,2 @@
+start.lisp
+config.lisp

+ 2 - 1
back/server.lisp

@@ -166,7 +166,8 @@
 
   ;; Load database
   (when-let (file (probe-file *db-path*))
-    (setf *db* (load-db file)))
+    (let ((*package* (find-package :chad-music.db)))
+      (setf *db* (load-db file))))
 
   ;; Set up debug file server
   (when serve-files