From abfa55bd272c6bccaa89a710e5665dd6163acf2b Mon Sep 17 00:00:00 2001
From: cqc <cqc@conrailqualitycontent.net>
Date: Fri, 29 Mar 2024 17:37:20 -0500
Subject: [PATCH] fix types that merlin missed

---
 .config/init.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/.config/init.ml b/.config/init.ml
index b233e52..8b60e93 100644
--- a/.config/init.ml
+++ b/.config/init.ml
@@ -107,7 +107,7 @@ let _ =
       let textbox : 'a Js.t =
         by_id_coerce "userinput" Dom_html.CoerceTo.textarea
       in
-      let rootstore = Store.test_pull () in
+      let rootstore, rootsync = Store.test_pull () in
       rootstore >>= fun rs ->
       let workspace_store =
         Store.S.Tree.find_tree rs [ ".config"; "workspace" ]