diff --git a/src/git_kv.ml b/src/git_kv.ml index 718e957..8b391e1 100644 --- a/src/git_kv.ml +++ b/src/git_kv.ml @@ -255,7 +255,7 @@ let pack t ~commit stream = let to_octets t = match t.head with | None -> Lwt.return "PACK\000\000\000\002\000\000\000\000\ - \x02\x9d\x08\x82\x3b\xd8\xa8\xea\xb5\xad\x6a\xc7\x5c\x82\x3c\xfd\x3e\xd3\x1e" + \x02\x9d\x08\x82\x3b\xd8\xa8\xea\xb5\x10\xad\x6a\xc7\x5c\x82\x3c\xfd\x3e\xd3\x1e" | Some commit -> let buf = Buffer.create 0x100 in let stream = Option.iter (Buffer.add_string buf) in