|
|
@@ -199,7 +199,9 @@
|
|
|
(select-keys existing-page [:db/ident]))
|
|
|
[:db/retract [:block/uuid (:block/uuid existing-page)] :block/tags :logseq.class/Page]]]
|
|
|
{:tx-meta tx-meta
|
|
|
- :tx-data tx-data})))
|
|
|
+ :tx-data tx-data
|
|
|
+ :page-uuid (:block/uuid existing-page)
|
|
|
+ :title (:block/title existing-page)})))
|
|
|
(let [page (gp-block/page-name->map title db true date-formatter
|
|
|
{:class? class?
|
|
|
:page-uuid (when (uuid? uuid) uuid)
|