(** adds an header option in the header option list*)
let add_headers header key value =
{ header with
headers = Http_headers.add key value header.headers }
Как понять "заголовок с заголовками ..."? Я предполагаю, что он "заменит" header.headers на новые заголовки. Однако передаваемый заголовок должен быть неизменным, не так ли?
С уважением! * * 1004