fix: export datoms urls

src/main/frontend/worker/export.cljs

@@ -61,11 +61,17 @@
   [conn]
   (some->> (d/datoms @conn :eavt)
            (map (fn [{:keys [e a v t]}]
-                  (if (and (contains? #{:block/title :block/name} a)
-                           (let [entity (d/entity @conn e)]
-                             (and (not (:db/ident entity))
-                                  (not (ldb/journal? entity))
-                                  (not (:logseq.property/built-in? entity))
-                                  (not (= :logseq.property/query (:db/ident (:logseq.property/created-from-property entity)))))))
+                  (cond
+                    (= :url (:logseq.property/type (d/entity @conn a)))
+                    (d/datom e a "https://logseq.com" t)
+
+                    (and (contains? #{:block/title :block/name} a)
+                         (let [entity (d/entity @conn e)]
+                           (and (not (:db/ident entity))
+                                (not (ldb/journal? entity))
+                                (not (:logseq.property/built-in? entity))
+                                (not (= :logseq.property/query (:db/ident (:logseq.property/created-from-property entity)))))))
                     (d/datom e a (str "debug " e) t)
+
+                    :else
                     (d/datom e a v t))))))