fix: don't treat hex colors as pages

close #2556
pull/2566/head
Tienson Qin 2021-08-06 12:29:22 +08:00
parent 57449db9ca
commit 41829e04cd
1 changed files with 5 additions and 2 deletions

View File

@ -197,14 +197,17 @@
(let [properties (seq properties)
properties-order (keys properties)
page-refs (->>
properties
(remove (fn [[k _]]
(contains? #{:background-color :background_color} (keyword k))))
(map last)
(map (fn [v]
(when (string? v)
(let [v (string/trim v)
result (text/split-page-refs-without-brackets v {:un-brackets? false})]
(if (coll? result)
(map text/page-ref-un-brackets! result)
[]))))
(map last properties))
[])))))
(apply concat)
(remove string/blank?))
properties (->> properties