fix: legacy wrapping of " around title contains

This commit is contained in:
Junyi Du
2022-09-02 20:11:11 +08:00
committed by Gabriel Horner
parent 60e9f083fb
commit 41fbed5ce5

View File

@@ -64,10 +64,10 @@
(:file/path (:block/file page)))))))
(defn- build-title [page]
(let [original-name (:block/original-name page)]
(if (string/includes? original-name ",")
(util/format "\"%s\"" original-name)
original-name)))
;; Don't wrap `\"` anymore, as tiitle property is not effected by `,` now
;; The previous extract behavior isn't unwrapping the `'"` either. So no need
;; to maintain the compatibility.
(:block/original-name page))
(defn default-properties-block
([title format page]