From 9c724c8e950cb2afd487125b496536b75fc77245 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Tue, 2 Apr 2024 14:27:33 +0200
Subject: [PATCH] :sparkles: Set better log level on some rpc middlewares

---
 backend/src/app/rpc.clj        | 2 +-
 backend/src/app/rpc/climit.clj | 2 +-
 backend/src/app/rpc/cond.clj   | 2 +-
 backend/src/app/rpc/retry.clj  | 2 +-
 4 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/backend/src/app/rpc.clj b/backend/src/app/rpc.clj
index ea49b6b70..89eee548d 100644
--- a/backend/src/app/rpc.clj
+++ b/backend/src/app/rpc.clj
@@ -201,7 +201,7 @@
 
 (defn- wrap
   [cfg f mdata]
-  (l/debug :hint "register method" :name (::sv/name mdata))
+  (l/trc :hint "register method" :name (::sv/name mdata))
   (let [f (wrap-all cfg f mdata)]
     (partial f cfg)))
 
diff --git a/backend/src/app/rpc/climit.clj b/backend/src/app/rpc/climit.clj
index 3c23a7402..7dbec0861 100644
--- a/backend/src/app/rpc/climit.clj
+++ b/backend/src/app/rpc/climit.clj
@@ -200,7 +200,7 @@
       (reduce (fn [handler [limit-id key-fn]]
                 (if-let [config (get config limit-id)]
                   (let [key-fn (or key-fn noop-fn)]
-                    (l/dbg :hint "instrumenting method"
+                    (l/trc :hint "instrumenting method"
                            :method label
                            :limit (id->str limit-id)
                            :timeout (:timeout config)
diff --git a/backend/src/app/rpc/cond.clj b/backend/src/app/rpc/cond.clj
index a7db513b8..3fe03c821 100644
--- a/backend/src/app/rpc/cond.clj
+++ b/backend/src/app/rpc/cond.clj
@@ -51,7 +51,7 @@
   [_ f {:keys [::get-object ::key-fn ::reuse-key?] :as mdata}]
   (if (and (ifn? get-object) (ifn? key-fn))
     (do
-      (l/debug :hint "instrumenting method" :service (::sv/name mdata))
+      (l/trc :hint "instrumenting method" :service (::sv/name mdata))
       (fn [cfg {:keys [::key] :as params}]
         (if *enabled*
           (let [key' (when (or key reuse-key?)
diff --git a/backend/src/app/rpc/retry.clj b/backend/src/app/rpc/retry.clj
index 3745b9d8f..5e2d62013 100644
--- a/backend/src/app/rpc/retry.clj
+++ b/backend/src/app/rpc/retry.clj
@@ -44,7 +44,7 @@
   (if (::enabled mdata)
     (let [max-retries (get mdata ::max-retries 3)
           matches?    (get mdata ::when always-false)]
-      (l/dbg :hint "wrapping retry" :name name :max-retries max-retries)
+      (l/trc :hint "wrapping retry" :name name :max-retries max-retries)
       (fn [cfg params]
         (-> cfg
             (assoc ::max-retries max-retries)