Makes cursor-seq for lists

This commit is contained in:
2023-10-23 15:02:36 -07:00
parent be9d777a17
commit 84d6f455ff
4 changed files with 15 additions and 15 deletions

View File

@@ -322,9 +322,7 @@
(com/data-grid {:headers [(com/data-grid-header {} "Client")
(com/data-grid-header {} )]
:id "client-table"}
(doall (for [client fc/*current*]
(fc/with-cursor client
(client-row* client))))
(fc/cursor-map #(client-row* %))
(com/data-grid-row
{:class "new-row"}
(com/data-grid-cell {:colspan 2
@@ -337,9 +335,7 @@
:hx-vals (hiccup/raw "js:{index: countRows(\"#client-table\")}")
:hx-target "#edit-form .new-row"
:hx-swap "beforebegin"}
"New override")])))
))
[:div#form-errors [:span.error-content]]]
"New override")])))))]
[:div
[:div [:div#form-errors (when (:errors fc/*form-errors*)
[:span.error-content