From 6639625c1e24e764692ec9d65939ff9ef50d76df Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Mon, 7 Feb 2022 13:43:47 +0100 Subject: Rename application functions --- editor/actions/import.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'editor/actions/import.ml') diff --git a/editor/actions/import.ml b/editor/actions/import.ml index da74b50..b87960b 100755 --- a/editor/actions/import.ml +++ b/editor/actions/import.ml @@ -21,7 +21,7 @@ module M = struct type t = Forms.Selector.t - let update + let process : t -> State.t -> State.t = fun t state -> match t.Forms.Selector.file with @@ -54,5 +54,5 @@ let create () = in Note.E.map - (fun v -> App.ev (module M) v) + (fun v -> App.dispatch (module M) v) (Note.E.Option.on_some ev) -- cgit v1.2.3