From dcd3af211b41e81107a3e9eec2bdfef60eb07992 Mon Sep 17 00:00:00 2001
From: Nicolas Trangez <ikke@nicolast.be>
Date: Thu, 26 Jun 2014 16:52:22 +0200
Subject: [PATCH] Configure `Ssl` to be silent during certificate chain
 validation

This depends on
https://github.com/Incubaid/ocaml-ssl/commit/7ae54282f2db8ce88b0bb25284cc0c975900ae73
---
 src/main/main.ml | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/main/main.ml b/src/main/main.ml
index 5e289fa3..fb2dc4b3 100644
--- a/src/main/main.ml
+++ b/src/main/main.ml
@@ -143,6 +143,7 @@ let run_some_tests repeat_count filter =
 let main () =
   Ssl_threads.init ();
   Ssl.init ~thread_safe:true ();
+  Ssl.set_client_verify_callback_verbose false;
 
   let _ = Bz2.version in
   let () = Sys.set_signal Sys.sigpipe Sys.Signal_ignore in