minor improvements
This commit is contained in:
@@ -686,8 +686,6 @@
|
||||
:headers {"hx-trigger" (hx/json { "notification" (format "%d successful, %d with warnings. Any ledger entries with warnings have been removed." (:successful result) (:ignored result))})})))
|
||||
|
||||
|
||||
|
||||
|
||||
(def key->handler
|
||||
(merge
|
||||
(apply-middleware-to-all-handlers
|
||||
|
||||
@@ -14,6 +14,7 @@
|
||||
wrap-schema-enforce]]
|
||||
[auto-ap.time :as atime]))
|
||||
|
||||
|
||||
(def altered-grid-page
|
||||
(assoc grid-page
|
||||
:id "yoho"
|
||||
@@ -21,14 +22,6 @@
|
||||
:check-boxes? false
|
||||
:route ::route/investigate-results))
|
||||
|
||||
(defn investigate-results [request]
|
||||
(clojure.pprint/pprint (:query-params request))
|
||||
(html-response
|
||||
(table*
|
||||
altered-grid-page
|
||||
identity
|
||||
request
|
||||
#_(assoc-in request [:query-params :sort] [{:sort-key "date" :asc? false}]))))
|
||||
|
||||
(defn investigate [request]
|
||||
(modal-response
|
||||
|
||||
Reference in New Issue
Block a user