浏览代码

[back] fix start

Innocenty Enikeew 7 年之前
父节点
当前提交
2a5bf82c17
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      back/server.lisp

+ 1 - 1
back/server.lisp

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