kumikode/leaflet
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

make Map.create take Brr.El

Browse source
This commit is contained in:
Swrup 2022-05-19 16:16:37 +02:00
parent 2a126d0822
commit f26ea6f5bb
4 changed files with 12 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
example/main.ml
View file

@ -1,7 +1,11 @@
(* create map *)
let map =
let container_id = "map" in
Leaflet.Map.create container_id
let container =
match Brr.Document.find_el_by_id Brr.G.document (Jstr.of_string "map") with
| None -> failwith "map container not found"
| Some el -> el
in
Leaflet.Map.create container
(* setup map *)
let () =