fix: don't capitalize right sidebar's page names

pull/1177/head
Tienson Qin 2021-01-19 20:38:56 +08:00
parent 36016a2dc7
commit 86e2f8eb77
1 changed files with 6 additions and 3 deletions

View File

@ -145,12 +145,15 @@
(block-cp repo idx block-data)]]))
:page
(let [page-name (:page/name block-data)]
[[:a {:href (rfe/href :page {:name (util/url-encode page-name)})
(let [page-name (:page/name block-data)
page (db/pull [:page/name (string/lower-case page-name)])
page-name (or (:page/original-name page)
(:page/name page))]
[[:a {:href (rfe/href :page {:name page-name})
:on-click (fn [e]
(when (gobj/get e "shiftKey")
(.preventDefault e)))}
(util/capitalize-all page-name)]
page-name]
[:div.ml-2
(page-cp repo page-name)]])