add marker options

This commit is contained in:
Swrup 2022-06-20 08:16:21 +02:00
parent 69024b75da
commit 6aca93ebe9
4 changed files with 68 additions and 6 deletions

View file

@ -55,8 +55,22 @@ val create_geojson : ?options:Jv.t -> Jv.t -> [ `Geojson ] t
(** Marker layers *)
type marker_opt =
| Icon of Icon.t
| Keyboard of bool
| Title of string
| Alt of string
| Z_index_offset of int
| Opacity of float
| Rise_on_hover of bool
| Rise_offset of int
| Pane of string
| Shadow_pane of string
| Bubbling_mouse_events of bool
| Auto_pan_on_focus of bool
(** [create_marker latlng] is a new marker with the same position as latlng *)
val create_marker : Latlng.t -> [ `Marker ] t
val create_marker : Latlng.t -> marker_opt list -> [ `Marker ] t
(** Tile layers *)