From 2e29673fa970b814c97d5838963de49c2a65424b Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Mon, 7 Feb 2022 13:43:24 +0100 Subject: Rename application functions --- script.it/script_event/export.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'script.it/script_event/export.ml') diff --git a/script.it/script_event/export.ml b/script.it/script_event/export.ml index 9e900c7..10dd937 100755 --- a/script.it/script_event/export.ml +++ b/script.it/script_event/export.ml @@ -4,7 +4,7 @@ module State = Script_state.State type t = unit -let update () state = +let process () state = let my_host = Uri.host @@ Window.location @@ G.window in if (Hashtbl.hash my_host) = Blog.Hash_host.expected_host then ( (* Convert the path into an sVG element *) -- cgit v1.2.3