diff options
| author | Joris | 2022-07-05 21:55:41 +0200 |
|---|---|---|
| committer | Joris | 2022-07-05 21:55:41 +0200 |
| commit | accc3d9c67e004aa814d1592d97342d3a7766bb4 (patch) | |
| tree | 3d50654383e0386f9dc22b8f0f586f928dd856d9 /src/Lib/Modal.ml | |
| parent | 2936f06576997bffe7903ea840df563a408efc21 (diff) | |
| download | map-accc3d9c67e004aa814d1592d97342d3a7766bb4.tar.gz map-accc3d9c67e004aa814d1592d97342d3a7766bb4.tar.bz2 map-accc3d9c67e004aa814d1592d97342d3a7766bb4.zip | |
WIP Rewrite in TS
Diffstat (limited to 'src/Lib/Modal.ml')
| -rw-r--r-- | src/Lib/Modal.ml | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/src/Lib/Modal.ml b/src/Lib/Modal.ml deleted file mode 100644 index 5db88cd..0000000 --- a/src/Lib/Modal.ml +++ /dev/null @@ -1,25 +0,0 @@ -let hide () = - let modal = Document.query_selector_unsafe "#g-Modal" in - Element.remove_child Document.body modal - -let show content = - let view = - H.div - [| HA.id "g-Modal" |] - [| H.div - [| HA.class_ "g-Modal__Curtain" - ; HE.on_click (fun _ -> hide ()) - |] - [| |] - ; H.div - [| HA.class_ "g-Modal__Window" |] - [| Button.raw - [| HA.class_ "g-Modal__Close" - ; HE.on_click (fun _ -> hide ()) - |] - [| H.div [| HA.class_ "fa fa-close" |] [| |] |] - ; content - |] - |] - in - Element.append_child Document.body view |