Makes navigation a little bit better.

src/clj/auto_ap/ssr/grid_page_helper.clj

@@ -208,7 +208,6 @@
 
 (defn table-route [grid-spec]
   (-> (fn table [{:keys [identity] :as request}]
-        (alog/peek ::qp (pr-str (:query-params request)))
         (let [unparse-query-params (or (:unparse-query grid-spec)
                                        default-unparse-query-params)]
           (html-response (table*
@@ -249,7 +248,8 @@
                     :client-selection (:client-selection (:session  request))
                     :clients          (:clients request)
                     :client           (:client request)
-                    :identity         (:identity request)}
+                    :identity         (:identity request)
+                    :request request}
                    (apply com/breadcrumbs {} (:breadcrumbs grid-spec))
                    [:div {:x-data (hx/json {:selected [] :all_selected false})
                           "x-bind:hx-vals" "JSON.stringify({selected: $data.selected, 'all-selected': $data.all_selected})"
@@ -277,7 +277,9 @@
                             [:hide? {:optional true} [:=> [:cat entity-spec] :boolean]]]))
 (def grid-spec (m/schema [:map
                           [:id :string]
-                          [:nav vector?]
+                          [:nav [:=>
+                                    [:cat request-spec]
+                                    vector?]]
                           [:page-specific-nav
                            {:optional true
                             :default (fn [request])}