console/rootstore
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fix types that merlin missed

Browse Source
This commit is contained in:
cqc
2024-03-29 17:37:20 -05:00
parent df7caee5d6
commit 78c1b61467
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
.config/init.ml
View File

@ -107,7 +107,7 @@ let _ =
let textbox : 'a Js.t = let textbox : 'a Js.t =
by_id_coerce "userinput" Dom_html.CoerceTo.textarea by_id_coerce "userinput" Dom_html.CoerceTo.textarea
in in
let rootstore = Store.test_pull () in let rootsync, rootstore = Store.test_pull () in
rootstore >>= fun rs -> rootstore >>= fun rs ->
let workspace_store = let workspace_store =
Store.S.Tree.find_tree rs [ ".config"; "workspace" ] Store.S.Tree.find_tree rs [ ".config"; "workspace" ]