Browse Source

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

Tienson Qin 4 years ago
parent
commit
c394534e48
1 changed files with 4 additions and 1 deletions
  1. 4 1
      src/main/frontend/format/mldoc.cljs

+ 4 - 1
src/main/frontend/format/mldoc.cljs

@@ -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))