From 0b1c7ca41a6d8ce41b9783153b567c16250913ff Mon Sep 17 00:00:00 2001
From: Estevan Castilho <tevo@riajuu.net>
Date: Sat, 24 Oct 2026 00:20:04 +0000
Subject: `fold_left` -> `foldm_right`

---
 lib/kernel/Path.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/kernel/Path.ml')

diff --git a/lib/kernel/Path.ml b/lib/kernel/Path.ml
index 4859584..24d3d10 100644
--- a/lib/kernel/Path.ml
+++ b/lib/kernel/Path.ml
@@ -120,7 +120,7 @@ let assoc_all handle changes =
         in
         (* each step derives from the last; only the steps in between are
            ours to release *)
-        Utilities.List.fold_left
+        Utilities.List.foldm_left
           (fun current change ->
             let* next = assoc_on current change in
             if current != node then Handle.release current;
-- 
cgit v1.2.3