diff options
author | Sébastien Dailly <sebastien@dailly.me> | 2022-02-07 13:43:24 +0100 |
---|---|---|
committer | Sébastien Dailly <sebastien@dailly.me> | 2022-02-07 16:22:43 +0100 |
commit | 2e29673fa970b814c97d5838963de49c2a65424b (patch) | |
tree | 09d61022038ebfd392873c1a0c62e984d901d11a /script.it/script_event/export.ml | |
parent | 155fec516022d2d5a1343312792dce21f466573a (diff) |
Rename application functions
Diffstat (limited to 'script.it/script_event/export.ml')
-rwxr-xr-x | script.it/script_event/export.ml | 2 |
1 files changed, 1 insertions, 1 deletions
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 *) |