fix: title of newly created pages are all lowered

This commit is contained in:
Tienson Qin
2022-05-08 22:19:30 +08:00
parent 3166da23e3
commit ca5745fc9b
4 changed files with 12 additions and 9 deletions

View File

@@ -258,7 +258,8 @@
[original-page-name page-name journal-day] (convert-page-if-journal original-page-name)
namespace? (and (not (boolean (text/get-nested-page-name original-page-name)))
(text/namespace-page? original-page-name))
page-entity (db/entity [:block/name page-name])]
page-entity (db/entity [:block/name page-name])
original-page-name (or (:block/original-name page-entity) original-page-name)]
(merge
{:block/name page-name
:block/original-name original-page-name}