diff --git a/bin/builder_web_app.ml b/bin/builder_web_app.ml index 18e2839..34173f8 100644 --- a/bin/builder_web_app.ml +++ b/bin/builder_web_app.ml @@ -30,7 +30,7 @@ let write_raw s buf = safe_close s >|= fun () -> Error `Exception) in - (* Logs.debug (fun m -> m "writing %a" Cstruct.hexdump_pp (Cstruct.of_bytes buf)) ; *) + (* Logs.debug (fun m -> m "writing %a" (Ohex.pp_hexdump ()) (Bytes.unsafe_to_string buf)) ; *) w 0 (Bytes.length buf) let process =