chore: distinct pages by :block/name

src/main/frontend/db_schema.cljs

@@ -44,6 +44,7 @@
    :block/path-refs {:db/valueType   :db.type/ref
                      :db/cardinality :db.cardinality/many}
 
+   ;; for pages
    :block/tags {:db/valueType :db.type/ref
                 :db/cardinality :db.cardinality/many}
 

src/main/frontend/handler/extract.cljs

@@ -111,12 +111,8 @@
                   (fn [page]
                     {:block/original-name page
                      :block/name (string/lower-case page)})
-                  @ref-tags)
-                 (map
-                  (fn [page]
-                    {:block/original-name page
-                     :block/name (string/lower-case page)})
-                  @ref-pages))
+                   (concat @ref-tags @ref-pages)))
+          pages (util/distinct-by :block/name pages)
           block-ids (mapv (fn [block]
                             {:block/uuid (:block/uuid block)})
                           (remove nil? blocks))]