mirror of https://github.com/logseq/logseq
parent
57c906a9bb
commit
850cc0f4ac
|
@ -343,8 +343,13 @@
|
|||
[old-name new-name]
|
||||
(let [new-name (string/trim new-name)]
|
||||
(when-not (string/blank? new-name)
|
||||
(when (and old-name new-name
|
||||
(not= (string/trim old-name) (string/trim new-name)))
|
||||
(when (and old-name new-name)
|
||||
(let [case-changed? (and (= (string/lower-case old-name)
|
||||
(string/lower-case new-name))
|
||||
(not= (string/trim old-name)
|
||||
(string/trim new-name)))
|
||||
name-changed? (not= (string/lower-case (string/trim old-name))
|
||||
(string/lower-case (string/trim new-name)))]
|
||||
(when-let [repo (state/get-current-repo)]
|
||||
(when-let [page (db/entity [:page/name (string/lower-case old-name)])]
|
||||
(let [old-original-name (:page/original-name page)
|
||||
|
@ -355,7 +360,7 @@
|
|||
:page/name (string/lower-case new-name)
|
||||
:page/original-name new-name}])
|
||||
|
||||
(when (and file (not journal?))
|
||||
(when (and file (not journal?) name-changed?)
|
||||
(rename-file! file new-name
|
||||
(fn []
|
||||
(page-add-properties! (string/lower-case new-name) {:title new-name}))))
|
||||
|
@ -384,7 +389,7 @@
|
|||
|
||||
(repo-handler/push-if-auto-enabled! repo)
|
||||
|
||||
(ui-handler/re-render-root!)))))))
|
||||
(ui-handler/re-render-root!))))))))
|
||||
|
||||
(defn rename-when-alter-title-property!
|
||||
[page path format original-content content]
|
||||
|
|
Loading…
Reference in New Issue