let
log t =
Log
.(brakets ( s
"Host "
% s (
Uri
.to_string (to_uri t))))