1.1--- a/scripts/org-graph-db-init.lisp Fri Sep 13 22:17:56 2024 -0400
1.2+++ b/scripts/org-graph-db-init.lisp Mon Sep 23 19:47:38 2024 -0400
1.3@@ -8,7 +8,7 @@
1.4 (unless (find-package :org-graph-db)
1.5 (defpkg :org-graph-db
1.6 (:use :cl :std :rdb
1.7- :obj/db :obj/query :obj/id :obj/uuid)))
1.8+ :obj/db :obj/query :obj/id :obj/uuid :q)))
1.9
1.10 (in-package :org-graph-db)
1.11
1.12@@ -85,7 +85,6 @@
1.13 (open-db db)
1.14 (open-cfs db)
1.15 (setq *org-graph-db* db)
1.16- ;; (open-cfs db)
1.17 (insert-org-files)
1.18 (insert-org-nodes)
1.19 (log:info! "created org-graph-db" db *org-graph-db-directory* *org-graph-schema*)))