diff options
author | Sébastien Dailly <sebastien@dailly.me> | 2022-02-07 13:43:47 +0100 |
---|---|---|
committer | Sébastien Dailly <sebastien@dailly.me> | 2022-02-07 16:43:33 +0100 |
commit | 6639625c1e24e764692ec9d65939ff9ef50d76df (patch) | |
tree | 099769a2b400309c3a509df294c3710fe5639536 /editor/actions/add_page.ml | |
parent | 47e4ab0cf1b7d364439a1a47df53f2d58a216239 (diff) |
Rename application functions
Diffstat (limited to 'editor/actions/add_page.ml')
-rwxr-xr-x | editor/actions/add_page.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/editor/actions/add_page.ml b/editor/actions/add_page.ml index 1da8e3f..dff2c2f 100755 --- a/editor/actions/add_page.ml +++ b/editor/actions/add_page.ml @@ -10,7 +10,7 @@ module M = struct = fun title -> title - let update + let process : t -> State.t -> State.t = fun {title} state -> let page_id = key_of_title title in @@ -36,7 +36,7 @@ let create () in Note.E.map - (fun v -> App.ev (module M) v) + (fun v -> App.dispatch (module M) v) (* Option.on_some trigger the event only when the pop up is validated. Closing the popup doesn't do anything. *) |