From 25afb0bde9b8a2c064135a534231c232a461b341 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sun, 16 Feb 2020 22:45:07 +0100
Subject: Set up a first version of tabata timer

---
 src/Dom/Document.ml | 4 ++++
 1 file changed, 4 insertions(+)
 create mode 100644 src/Dom/Document.ml

(limited to 'src/Dom/Document.ml')

diff --git a/src/Dom/Document.ml b/src/Dom/Document.ml
new file mode 100644
index 0000000..afd1a84
--- /dev/null
+++ b/src/Dom/Document.ml
@@ -0,0 +1,4 @@
+external querySelector : string -> Dom.element option = "querySelector"
+  [@@bs.val] [@@bs.scope "document"]
+
+let querySelectorUnsafe id = querySelector id |> Js.Option.getExn
-- 
cgit v1.2.3