diff --git a/src/lib_client_base_unix/client_context_unix.ml b/src/lib_client_base_unix/client_context_unix.ml
index 549ece054d8ffc7d4351942ce96c4fc8cd2e22ae..babe0d1c3709c876ecb0fbdec05775e919d54de8 100644
--- a/src/lib_client_base_unix/client_context_unix.ml
+++ b/src/lib_client_base_unix/client_context_unix.ml
@@ -250,7 +250,7 @@ class unix_mockup ~base_dir ~mem_only ~mockup_env ~chain_id ~rpc_context
 
     method confirmations = None
 
-    method verbose_rpc_error_diagnostics = true
+    method verbose_rpc_error_diagnostics = false
   end
 
 class unix_proxy ~base_dir ?protocol ~chain ~block ~confirmations
@@ -279,5 +279,5 @@ class unix_proxy ~base_dir ?protocol ~chain ~block ~confirmations
 
     method confirmations = confirmations
 
-    method verbose_rpc_error_diagnostics = true
+    method verbose_rpc_error_diagnostics = false
   end
diff --git a/src/lib_proxy/proxy_commands.ml b/src/lib_proxy/proxy_commands.ml
index 00b55961229328ffb28a1bd8fe5e771df926dcbd..fafda8a3632ed35036e43e6ed176c2d5393affe2 100644
--- a/src/lib_proxy/proxy_commands.ml
+++ b/src/lib_proxy/proxy_commands.ml
@@ -29,11 +29,15 @@ let group : Tezos_clic.group =
     title = "Commands querying proxy and light mode support";
   }
 
-let list_proxy_command_handler _ _ =
-  List.iter (fun (module Proxy : Registration.Proxy_sig) ->
-      Format.printf "%a@." Protocol_hash.pp Proxy.protocol_hash)
-  @@ Registration.get_all_registered () ;
-  Lwt_result_syntax.return_unit
+let list_proxy_command_handler _
+    (cctxt : #Tezos_client_base.Client_context.full) =
+  let open Lwt_result_syntax in
+  let*! () =
+    List.iter_s (fun (module Proxy : Registration.Proxy_sig) ->
+        cctxt#message "%a@." Protocol_hash.pp Proxy.protocol_hash)
+    @@ Registration.get_all_registered ()
+  in
+  return_unit
 
 let list_env_command (flag : string) : _ Tezos_clic.command =
   let open Tezos_clic in