@@ -10,7 +10,7 @@ All of the above pages can be customized with query config options."
10
10
[clojure.edn :as edn]
11
11
[clojure.set :as set]
12
12
[datascript.core :as d]
13
- [logseq.db.rules :as rules]
13
+ [logseq.db.frontend. rules :as rules]
14
14
[babashka.cli :as cli]
15
15
[logseq.graph-parser.cli :as gp-cli]
16
16
[logseq.rdf-export.config :as config]
@@ -23,18 +23,18 @@ All of the above pages can be customized with query config options."
23
23
(map
24
24
(fn [block]
25
25
(let [block-name (or (get-in block [:block/properties :title ])
26
- (:block/original-name block)
26
+ (:block/title block)
27
27
; ; Use page name for non-journal pre-blocks
28
28
(when-not (get-in block [:block/page :block/journal? ])
29
- (get-in block [:block/page :block/original-name ])))]
29
+ (get-in block [:block/page :block/title ])))]
30
30
(cond->
31
31
(-> (:block/properties block)
32
32
; ; TODO: Add proper tags support
33
33
(dissoc :title :tags )
34
34
((fn [x] (apply dissoc x exclude-properties)))
35
35
expand-entity-fn)
36
36
(some? block-name)
37
- (assoc :block/original-name block-name))))
37
+ (assoc :block/title block-name))))
38
38
result))
39
39
40
40
(defn- page-url [page-name config]
@@ -49,8 +49,8 @@ All of the above pages can be customized with query config options."
49
49
[m
50
50
{:keys [url-property type-property classes-without-ids unique-id-properties] :as config}
51
51
property-map]
52
- (if-let [subject (if (:block/original-name m)
53
- (page-url (:block/original-name m) config)
52
+ (if-let [subject (if (:block/title m)
53
+ (page-url (:block/title m) config)
54
54
(some #(when-let [v (m %)]
55
55
(if (url? v) v (page-url v config)))
56
56
unique-id-properties))]
@@ -75,7 +75,7 @@ All of the above pages can be customized with query config options."
75
75
(defn- block->label-triple [block]
76
76
[(:url block)
77
77
" http://www.w3.org/2000/01/rdf-schema#label"
78
- (:block/original-name block)])
78
+ (:block/title block)])
79
79
80
80
(defn- build-alias-triples
81
81
[ents config]
@@ -84,7 +84,7 @@ All of the above pages can be customized with query config options."
84
84
(mapcat #(map (fn [alias]
85
85
(block->label-triple
86
86
{:url (page-url alias config)
87
- :block/original-name (:block/original-name %)}))
87
+ :block/title (:block/title %)}))
88
88
(:alias %)))))
89
89
90
90
(defn- add-class-instances [db config property-map {:keys [add-labels]}]
@@ -115,7 +115,7 @@ All of the above pages can be customized with query config options."
115
115
(vals rules/query-dsl-rules))
116
116
(map first)
117
117
(create-entities config))
118
- built-in-properties {:block/original-name
118
+ built-in-properties {:block/title
119
119
{:url (if add-labels
120
120
" http://www.w3.org/2000/01/rdf-schema#label"
121
121
" https://schema.org/name" )}
@@ -124,7 +124,7 @@ All of the above pages can be customized with query config options."
124
124
" http://www.w3.org/2002/07/owl#sameAs"
125
125
" https://schema.org/sameAs" )}}
126
126
property-map (into built-in-properties
127
- (map (juxt (comp keyword :block/original-name ) identity)
127
+ (map (juxt (comp keyword :block/title ) identity)
128
128
properties))]
129
129
(set
130
130
(concat
@@ -134,8 +134,8 @@ All of the above pages can be customized with query config options."
134
134
(when add-labels
135
135
(map (fn [[k v]]
136
136
(block->label-triple
137
- {:url (:url v) :block/original-name (name k)}))
138
- (dissoc built-in-properties :block/original-name )))))))
137
+ {:url (:url v) :block/title (name k)}))
138
+ (dissoc built-in-properties :block/title )))))))
139
139
140
140
(defn- add-quads [writer quads]
141
141
(doseq [[q1 q2 q3]
0 commit comments