change map creation
This commit is contained in:
parent
06c614d2c5
commit
83527f5cae
3 changed files with 16 additions and 14 deletions
|
|
@ -1,11 +1,5 @@
|
|||
(* create map *)
|
||||
let map =
|
||||
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
|
||||
let map = Leaflet.Map.create_on "map"
|
||||
|
||||
(* setup map *)
|
||||
let () =
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue