From 750ec11b5f6bc29adfbc1ee2618abf3c80b20733 Mon Sep 17 00:00:00 2001
From: Hannes Mehnert <hannes@mehnert.org>
Date: Tue, 29 Oct 2024 09:50:53 +0100
Subject: [PATCH] remove superfluous assignment, spotted by @dinosaure

---
 src/git_kv.ml | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/git_kv.ml b/src/git_kv.ml
index a8c9363..33fa5fc 100644
--- a/src/git_kv.ml
+++ b/src/git_kv.ml
@@ -688,7 +688,6 @@ module Make (Pclock : Mirage_clock.PCLOCK) = struct
         | Some th -> th ) >>= fun () ->
       ( let open Lwt_result.Infix in
         tree_root_hash_of_store t >>= fun tree_root_hash ->
-        t.change_and_push_waiter <- Some th ;
         let t' = { t with committed = Some tree_root_hash } in
         f t' >>! fun res ->
         (* XXX(dinosaure): we assume that only [change_and_push] can reset [t.committed] to [None] and