get display to work

src/dune

@@ -4,18 +4,18 @@
   app
   asset
   content
-  pellest
-  template
+  db
   home
-  register
+  island
   login
   logout
-  user
+  pellest
+  register
   syntax
-  db
-  tyx_util)
+  template
+  tyx_util
+  user)
  (libraries
-  uuidm
   bos
   caqti
   caqti.blocking
@@ -28,9 +28,10 @@
   lwt
   safepass
   scfg
-  uri
   tyxml
   tyxml.functor
+  uri
+  uuidm
   yojson)
  (preprocess
   (pps lwt_ppx)))
@@ -38,8 +39,17 @@
 (rule
  (target content.ml)
  (deps
-  (source_tree content))
+  (source_tree content)
+  island_client.bc.js)
  (action
   (with-stdout-to
    %{null}
    (run ocaml-crunch -m plain content -o %{target}))))
+
+(executable
+ (name island_client)
+ (modules island_client)
+ (libraries js_of_ocaml brr)
+ (modes js)
+ (preprocess
+  (pps js_of_ocaml-ppx)))