Builds client SSR approach, sunsets old cljs.

src/clj/auto_ap/handler.clj

@@ -217,7 +217,7 @@
                            (pull-many (dc/db conn)
                                                  d-clients/full-read))]
       
-      (mu/with-context {:clients (map :client/code clients)}
+      (mu/with-context {:clients (take 10 (map :client/code clients))}
         (handler (assoc request
                         :clients clients
                         :client (when (= 1 (count clients))
@@ -273,7 +273,7 @@
     (handler request)))
 
 #_{:clj-kondo/ignore [:clojure-lsp/unused-public-var]}
-(def app
+(defonce app
   (->  route-handler
        (wrap-hx-current-url-params)
        (wrap-guess-route)
@@ -293,7 +293,7 @@
                                 (byte-array
                                   [42, 52, -31, 105, -126, -33, -118, -69, -82, -59, -15, -69, -38, 103, -102, -1])} )})
 
-       (wrap-reload)
+       #_(wrap-reload)
        (wrap-params)
        (mp/wrap-multipart-params)
        (wrap-edn-params)