ソースを参照

fix: new DB graph can't be edited

Fixes LOG-3028
Tienson Qin 1 年間 前
コミット
a4ef8c6657
1 ファイル変更15 行追加9 行削除
  1. 15 9
      src/main/frontend/db_worker.cljs

+ 15 - 9
src/main/frontend/db_worker.cljs

@@ -300,15 +300,21 @@
 
                           true
                           (dissoc :insert-blocks?)))]
-         (when-not (and (:create-today-journal? tx-meta)
-                        (:today-journal-name tx-meta)
-                        (seq tx-data)
-                        (d/entity @conn [:block/name (:today-journal-name tx-meta)])) ; today journal created already
-
-           ;; (prn :debug :transact :tx-data tx-data :tx-meta tx-meta')
-
-           (worker-util/profile "Worker db transact"
-                                (ldb/transact! conn tx-data tx-meta')))
+         (if (and (:create-today-journal? tx-meta)
+                  (:today-journal-name tx-meta)
+                  (seq tx-data)
+                  (d/entity @conn [:block/name (:today-journal-name tx-meta)])) ; today journal created already
+
+           ;; remove task from ldb/*request-id->response
+           (worker-util/post-message :sync-db-changes (pr-str
+                                                       {:request-id (:request-id tx-meta)
+                                                        :repo repo
+                                                        :tx-data []
+                                                        :tx-meta nil}))
+           (do
+             ;; (prn :debug :transact :tx-data tx-data :tx-meta tx-meta')
+             (worker-util/profile "Worker db transact"
+                                  (ldb/transact! conn tx-data tx-meta'))))
          nil)
        (catch :default e
          (prn :debug :error)