diff --git a/src/main/frontend/worker/export.cljs b/src/main/frontend/worker/export.cljs index a29689bc3e..cd9387f161 100644 --- a/src/main/frontend/worker/export.cljs +++ b/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))))))