From 5e01804a85cb7b44858dbeb4073b0110447e2a6a Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Sat, 21 Jan 2023 23:01:19 -0800 Subject: [PATCH] Adds logging for bizarre case --- src/clj/auto_ap/ssr/company_dropdown.clj | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/clj/auto_ap/ssr/company_dropdown.clj b/src/clj/auto_ap/ssr/company_dropdown.clj index 011c9ba5..5666ecf4 100644 --- a/src/clj/auto_ap/ssr/company_dropdown.clj +++ b/src/clj/auto_ap/ssr/company_dropdown.clj @@ -92,6 +92,8 @@ document.getElementById(\"company-search-value\").dispatchEvent(new Event('chang ;; TODO PERMS (defn active-client [{:keys [identity params] :as request}] + (auto-ap.logging/info ::searched + :params params) (assert-can-see-client identity (Long/parseLong (:search params))) (let [new-session (assoc (:session request) :client (d/pull (d/db conn) [:db/id :client/name :client/code] (Long/parseLong (:search params))))]