From d1c0bcd0153cb02cc919ade7874b64b9e2e6f017 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Reynir=20Bj=C3=B6rnsson?= <reynir@reynir.dk>
Date: Mon, 29 Aug 2022 12:50:07 +0200
Subject: [PATCH] Be less verbose about ASN.1 parse errors

---
 lib/builder_web.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/builder_web.ml b/lib/builder_web.ml
index 8f5de34..77508f3 100644
--- a/lib/builder_web.ml
+++ b/lib/builder_web.ml
@@ -470,7 +470,8 @@ let routes ~datadir ~cachedir ~configdir =
     Builder.Asn.exec_of_cs (Cstruct.of_string body) |> Lwt.return
     |> if_error ~status:`Bad_Request "Bad request"
       ~log:(fun e ->
-        Log.warn (fun m -> m "Received bad builder ASN.1: %a" pp_error e))
+          Log.warn (fun m -> m "Received bad builder ASN.1");
+          Log.debug (fun m -> m "Bad builder ASN.1: %a" pp_error e))
     >>= fun ((({ name ; _ } : Builder.script_job), uuid, _, _, _, _, _) as exec) ->
     Log.debug (fun m -> m "Received build %a" pp_exec exec);
     Authorization.authorized req name