fix: remove "" from page property if it's wrapped by ""

pull/2456/head
Tienson Qin 2021-07-27 22:20:53 +08:00
parent 710c77fb0e
commit c394534e48
1 changed files with 4 additions and 1 deletions

View File

@ -184,7 +184,10 @@
(update :roam_alias ->vec)
(update :roam_tags (constantly roam-tags))
(update :filetags (constantly filetags)))
properties (medley/filter-kv (fn [k v] (not (empty? v))) properties)]
properties (medley/filter-kv (fn [k v] (not (empty? v))) properties)
properties (medley/map-vals (fn [v] (if (and (string? v) (>= (count v) 2) (= (first v) (last v) "\""))
(subs v 1 (dec (count v)))
v)) properties)]
(if (seq properties)
(cons [["Properties" properties] nil] other-ast)
original-ast))