add icon
This commit is contained in:
parent
e33ad46092
commit
69024b75da
5 changed files with 75 additions and 1 deletions
21
src/icon.mli
Normal file
21
src/icon.mli
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
(* BSD-2-Clause License *)
|
||||
|
||||
type t
|
||||
|
||||
(* type for icon option used to create an icon*)
|
||||
type opt =
|
||||
| Icon_retina_url of string
|
||||
| Icon_size of Point.t
|
||||
| Icon_anchor of Point.t
|
||||
| Popup_anchor of Point.t
|
||||
| Tooltip_anchor of Point.t
|
||||
| Shadow_url of string
|
||||
| Shadow_retina_url of string
|
||||
| Shadow_size of Point.t
|
||||
| Shadow_anchor of Point.t
|
||||
| Class_name of string
|
||||
| Cross_origin of string option
|
||||
|
||||
(** [create icon_url options] Creates an icon instance with the given [options],
|
||||
and the required `iconUrl` option set to [icon_url] *)
|
||||
val create : string -> opt list -> t
|
||||
Loading…
Add table
Add a link
Reference in a new issue