fix: query filters are case sensitive

This commit is contained in:
Tienson Qin
2021-11-23 17:15:24 +08:00
parent eb66d456ed
commit 4ede5eaeb3

View File

@@ -147,6 +147,7 @@
([repo e {:keys [sort-by blocks? sample counter current-filter vars] :as env} level]
;; TODO: replace with multi-methods for extensibility.
(let [fe (first e)
fe (when fe (symbol (string/lower-case (name fe))))
page-ref? (text/page-ref? e)]
(when (or (and page-ref?
(not (contains? #{'page-property 'page-tags} (:current-filter env))))