Skip to content
Snippets Groups Projects
Commit 49b5cb29 authored by Simon Belak's avatar Simon Belak
Browse files

avoid needless sort

parent 39c83dd7
No related branches found
No related tags found
No related merge requests found
......@@ -378,17 +378,17 @@
2. Resolves the Fields returned in the results and adds information like `:columns` and `:cols` expected by the
frontend."
[query {:keys [columns rows], :as results}]
(let [cols (resolve-sort-and-format-columns (:query query)
(distinct columns)
(for [row (take 10 rows)]
(zipmap columns row)))
sorted-columns (mapv :name cols)
sorted-column-ordering (pre-sort-index->post-sort-index columns sorted-columns)]
(let [cols (resolve-sort-and-format-columns (:query query)
(distinct columns)
(for [row (take 10 rows)]
(zipmap columns row)))
sorted-columns (mapv :name cols)]
(assoc results
:cols (vec (for [col cols]
(update col :name name)))
:columns (mapv name sorted-columns)
:rows (if (not= sorted-column-ordering (sort sorted-column-ordering))
(for [row rows]
(mapv (partial nth (vec row)) sorted-column-ordering))
:rows (if (not= columns sorted-columns)
(let [sorted-column-ordering (pre-sort-index->post-sort-index columns sorted-columns)]
(for [row rows]
(mapv (partial nth (vec row)) sorted-column-ordering)))
rows))))
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment