Should fix read-only users with tons of clients

src/clj/auto_ap/routes/auth.clj

@@ -49,7 +49,7 @@
                       :db/id (:db/id user)
                       :user/role    (name (:user/role user))
                       :user/name    (:user/name user)}
-                (= "admin" (name (:user/role user)))
+                (#{"admin" "read-only"} (name (:user/role user)))
                (assoc :gz-clients (->> (:user/clients user)
                                        (map (fn [c]
                                               (select-keys c [:client/code :db/id :client/locations])))

src/clj/auto_ap/server.clj

@@ -67,6 +67,7 @@
   :start (run-jetty app {:port port
                          :join? false
                          :configurator configure-jetty
+                         :response-header-size 16384
                          :request-header-size 16384})
   :stop (.stop jetty))