From 081e6aae57719c15bdbc5e973ca7ddba9506a4bb Mon Sep 17 00:00:00 2001 From: Joris Date: Sat, 8 Aug 2020 12:49:03 +0200 Subject: Show context menu to add, modify and delete markers --- src/Lib/Dom/Event.ml | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) (limited to 'src/Lib/Dom/Event.ml') diff --git a/src/Lib/Dom/Event.ml b/src/Lib/Dom/Event.ml index acdc9fd..861afcf 100644 --- a/src/Lib/Dom/Event.ml +++ b/src/Lib/Dom/Event.ml @@ -1,3 +1,11 @@ -external preventDefault : Dom.event -> unit = "preventDefault" [@@bs.send] +external prevent_default : Dom.event -> unit = "preventDefault" + [@@bs.send] -external target : Dom.event -> Dom.element = "target" [@@bs.get] +external target : Dom.event -> Dom.element = "target" + [@@bs.get] + +external page_x : Dom.mouseEvent -> float = "pageX" + [@@bs.get] + +external page_y : Dom.mouseEvent -> float = "pageY" + [@@bs.get] -- cgit v1.2.3