Merge pull request #12846 from MinaProtocol/feature/debug-logs-in-net…

…work-batcher Demote network pool batch size logs to debug
MinaProtocol · Mar 29, 2023 · f936235 · f936235
2 parents 9f1fe53 + 945d167
commit f936235
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/lib/network_pool/batcher.ml b/src/lib/network_pool/batcher.ml
@@ -271,7 +271,7 @@ module Transaction_pool = struct
   let create verifier : t =
     let logger = Logger.create () in
     create ~compare_init:compare_envelope ~logger (fun (ds : input list) ->
-        [%log info]
+        [%log debug]
           "Dispatching $num_proofs transaction pool proofs to verifier"
           ~metadata:[ ("num_proofs", `Int (List.length ds)) ] ;
         let open Deferred.Or_error.Let_syntax in
@@ -367,7 +367,7 @@ module Snark_pool = struct
            (Sys.getenv_opt "MAX_VERIFIER_BATCH_SIZE") )
       ~compare_init:compare_envelope ~logger
       (fun ps0 ->
-        [%log info] "Dispatching $num_proofs snark pool proofs to verifier"
+        [%log debug] "Dispatching $num_proofs snark pool proofs to verifier"
           ~metadata:[ ("num_proofs", `Int (List.length ps0)) ] ;
         let ps =
           List.concat_map ps0 ~f:(function