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