diff options
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 *) |