فهرست منبع

enhance: display property ident only for validation error

Tienson Qin 10 ماه پیش
والد
کامیت
28e04b3b5d
2فایلهای تغییر یافته به همراه5 افزوده شده و 2 حذف شده
  1. 4 1
      deps/db/src/logseq/db/frontend/validate.cljs
  2. 1 1
      src/main/frontend/worker/commands.cljs

+ 4 - 1
deps/db/src/logseq/db/frontend/validate.cljs

@@ -41,7 +41,10 @@
           (let [explainer (get-schema-explainer (:closed-schema? validate-options))]
           (let [explainer (get-schema-explainer (:closed-schema? validate-options))]
             (js/console.error "Invalid datascript entities detected amongst changed entity ids:" changed-ids)
             (js/console.error "Invalid datascript entities detected amongst changed entity ids:" changed-ids)
             (doseq [m invalid-ent-maps]
             (doseq [m invalid-ent-maps]
-              (prn {:entity-map m
+              (prn {:entity-map (update m :block/properties (fn [properties]
+                                                              (map (fn [[p v]]
+                                                                     [(:db/ident p) v])
+                                                                   properties)))
                     :errors (me/humanize (explainer [m]))}))
                     :errors (me/humanize (explainer [m]))}))
             false)
             false)
           true)))))
           true)))))

+ 1 - 1
src/main/frontend/worker/commands.cljs

@@ -26,7 +26,7 @@
                            (cond
                            (cond
                              (qualified-keyword? value)
                              (qualified-keyword? value)
                              (= (:db/ident (get entity property)) value)
                              (= (:db/ident (get entity property)) value)
-                           ;; ref type
+                             ;; ref type
                              (and (int? value) (contains? db-property-type/all-ref-property-types (:type (:block/schema property-entity))))
                              (and (int? value) (contains? db-property-type/all-ref-property-types (:type (:block/schema property-entity))))
                              (= (:db/id (get entity property)) value)
                              (= (:db/id (get entity property)) value)
                              :else
                              :else