diff options
| author | Sébastien Dailly <sebastien@dailly.me> | 2022-02-26 13:42:32 +0100 |
|---|---|---|
| committer | Sébastien Dailly <sebastien@dailly.me> | 2022-02-26 15:19:51 +0100 |
| commit | 84b8439aa90f1465d05dcba936a25eaf96f914a0 (patch) | |
| tree | eb50a0a305d14d8591acb51e5ab745dcdd3e1f88 /motus/js/motus.ml | |
| parent | 4eff667b92ff7ef4c3542650509c03fb0de5cbce (diff) | |
Use the whole dictionnary when searching for a word for a faster exploration
Diffstat (limited to 'motus/js/motus.ml')
| -rw-r--r-- | motus/js/motus.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/motus/js/motus.ml b/motus/js/motus.ml index 402e14a..5e1252a 100644 --- a/motus/js/motus.ml +++ b/motus/js/motus.ml @@ -86,10 +86,10 @@ let main let proposition = S.value initial_prop in Elements.Transfert.get_content_from_url words - |> E.map (fun content -> + |> E.map (fun html_response -> State.App.dispatch (module Initialize) - Initialize.{ length; content; sender; proposition } ) ) + Initialize.{ length; html_response; sender; proposition } ) ) send_btn |> E.join in |