From 221b6451fb4f8559a10e7fefebd13ce125ef29d0 Mon Sep 17 00:00:00 2001
From: Joris
Date: Thu, 13 May 2021 14:50:51 +0200
Subject: Rewrite in TypeScript

BuckleScript is no longer maintained. Choose a widely used techno that
will still be maintained in the following years.
---
 src/main.ml | 14 --------------
 1 file changed, 14 deletions(-)
 delete mode 100644 src/main.ml

(limited to 'src/main.ml')

diff --git a/src/main.ml b/src/main.ml
deleted file mode 100644
index 003880b..0000000
--- a/src/main.ml
+++ /dev/null
@@ -1,14 +0,0 @@
-type view = Config of Config.config | Timer of Config.config
-
-let () =
-  let html = Document.querySelectorUnsafe "html" in
-  let main = Document.querySelectorUnsafe "main" in
-  let rec showView v =
-    Animation.replaceChild html main (fun _ ->
-        match v with
-        | Config config ->
-            ConfigView.render config (fun config -> showView (Timer config))
-        | Timer config ->
-            TimerView.render config (fun config -> showView (Config config)))
-  in
-  showView (Config Config.init)
-- 
cgit v1.2.3