Use the whole dictionnary when searching for a word for a faster exploration

1 files changed, 9 insertions, 2 deletions

diff --git a/motus/js/reload.ml b/motus/js/reload.ml
index f0b581f..ee9ab37 100644
--- a/motus/js/reload.ml
+++ b/motus/js/reload.ml
@@ -18,11 +18,18 @@ let process : t -> State.state -> State.state =
   in
 
   let new_state =
-    { state with analysis = Motus_lib.Wordlist.remove_word state.analysis word }
+    { state with
+      analysis = Motus_lib.Wordlist.remove_word state.analysis word
+    ; catalog = Motus_lib.Wordlist.remove_word state.catalog word
+    }
   in
   (* Get the new proposition if any *)
   let current_prop =
-    Initialize.get_proposition state.length new_state.analysis state.rules
+    Initialize.get_proposition
+      ~catalog:new_state.catalog
+      state.length
+      new_state.analysis
+      state.rules
   in
   match current_prop with
   | None -> new_state