module Default =
struct
  let default =
    [ `Multi_ack
    ; `Thin_pack
    ; `Side_band_64k
    ; `Ofs_delta
    ; `Agent "git/2.0.0"
    ; `Report_status
    ; `No_done ]
end

module Web_cohttp_lwt = Web_cohttp_lwt
module Cstruct_buffer = Cstruct_buffer

module Make
    (K : Git.Sync.CAPABILITIES)
    (C : Git.Sync_http.CLIENT
     with type +'a io = 'a Lwt.t
      and type headers = Web_cohttp_lwt.HTTP.headers
      and type body = unit -> (Cstruct.t * int * int) option Lwt.t
      and type meth = Web_cohttp_lwt.HTTP.meth
      and type uri = Web_cohttp_lwt.uri
      and type resp = Web_cohttp_lwt.resp)
    (S : Git.Minimal.S
     with type Hash.Digest.buffer = Cstruct.t
      and type Hash.hex = string)
  : Git.Sync_http.S
    with module Web    := Web_cohttp_lwt
     and module Client := C
     and module Store  := S
     and module Buffer := Cstruct_buffer
= struct
  include Git.Sync_http.Make(K)(Web_cohttp_lwt)(C)(S)(Cstruct_buffer)
end


module Default =
struct
  let default =
    [ `Multi_ack_detailed
    ; `Thin_pack
    ; `Side_band_64k
    ; `Ofs_delta
    ; `Agent "git/2.0.0"
    ; `Report_status
    ; `No_done ]
end

module Web_cohttp_lwt = Web_cohttp_lwt
module Cstruct_buffer = Cstruct_buffer

module Make
    (K : Git.Sync.CAPABILITIES)
    (C : Git.Sync_http.CLIENT
     with type +'a io = 'a Lwt.t
      and type headers = Web_cohttp_lwt.HTTP.headers
      and type body = unit -> (Cstruct.t * int * int) option Lwt.t
      and type meth = Web_cohttp_lwt.HTTP.meth
      and type uri = Web_cohttp_lwt.uri
      and type resp = Web_cohttp_lwt.resp)
    (S : Git.Minimal.S
     with type Hash.Digest.buffer = Cstruct.t
      and type Hash.hex = string)
  : Git.Sync_http.S
    with module Web    := Web_cohttp_lwt
     and module Client := C
     and module Store  := S
     and module Buffer := Cstruct_buffer
= struct
  include Git.Sync_http.Make(K)(Web_cohttp_lwt)(C)(S)(Cstruct_buffer)
end


Change multi_ack capabilities to multi_ack_detailed in the HTTP client
Change multi_ack capabilities to multi_ack_detailed in the HTTP client
