add popup options

This commit is contained in:
Swrup 2022-06-20 10:05:35 +02:00
parent 502614b9d4
commit 85e6ad34c6
6 changed files with 101 additions and 9 deletions

View file

@ -5,7 +5,7 @@ type t
(** [to_jv o] is [o] as {!Jv.t} *)
val to_jv : t -> Jv.t
(* type for icon option used to create an icon*)
(** type for icon option used to create an icon*)
type opt =
| Icon_retina_url of string
| Icon_size of Point.t