From 3e39f97d844dbe0ff5f57e3977bc220d366d4c0e Mon Sep 17 00:00:00 2001 From: Joris Date: Sat, 8 Aug 2020 13:41:27 +0200 Subject: Show icons in marker form --- src/Lib/Dom/Element.ml | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'src/Lib/Dom/Element.ml') diff --git a/src/Lib/Dom/Element.ml b/src/Lib/Dom/Element.ml index 391a95c..3c63ef4 100644 --- a/src/Lib/Dom/Element.ml +++ b/src/Lib/Dom/Element.ml @@ -1,10 +1,15 @@ -external set_value : Dom.element -> string -> unit = "value" [@@bs.set] +external set_value : Dom.element -> string -> unit = "value" + [@@bs.set] -external value : Dom.element -> string = "value" [@@bs.get] +external value : Dom.element -> string = "value" + [@@bs.get] external set_attribute : Dom.element -> string -> string -> unit = "setAttribute" [@@bs.send] +external set_class_name : Dom.element -> string -> unit = "className" + [@@bs.set] + external add_event_listener : Dom.element -> string -> (Dom.event -> unit) -> unit = "addEventListener" [@@bs.send] -- cgit v1.2.3