feat: bring block timestamps back

This commit is contained in:
Tienson Qin
2021-07-13 15:24:20 +08:00
parent 86661c2001
commit cac9470fbe
8 changed files with 67 additions and 43 deletions

View File

@@ -299,16 +299,23 @@
(keyword (string/lower-case (name order)))
:desc)
k (-> (string/lower-case (name k))
(string/replace "-" "_"))]
(when (contains? #{"created_at" "last_modified_at"} k)
(let [comp (if (= order :desc) >= <=)]
(reset! sort-by
(fn [result]
(->> result
flatten
(clojure.core/sort-by #(get-in % [:block/properties k])
comp))))
nil)))
(string/replace "_" "-"))]
(let [get-value (cond
(= k "created-at")
:block/created-at
(= k "updated-at")
:block/updated-at
:else
#(get-in % [:block/properties k]))
comp (if (= order :desc) >= <=)]
(reset! sort-by
(fn [result]
(->> result
flatten
(clojure.core/sort-by get-value comp))))
nil))
(= 'page fe)
(let [page-name (string/lower-case (first (rest e)))
@@ -442,9 +449,12 @@
result)
(when-let [query (query-wrapper query blocks?)]
(react/react-query repo
{:query query}
(if sort-by
{:transform-fn sort-by})))))))))
{:query query
:query-string query-string}
(cond->
{:use-cache? false}
sort-by
(assoc :transform-fn sort-by))))))))))
(defn custom-query
[repo query-m query-opts]