From 6ad4a599c201845be96d9a6ca71e2331724166e3 Mon Sep 17 00:00:00 2001
From: Anil Madhavapeddy <anil@recoil.org>
Date: Tue, 4 Jun 2019 11:04:09 +0100
Subject: [PATCH] use wrapped jsoo interfaces in 3.4.0

---
 CHANGES.md       | 1 +
 github-jsoo.opam | 2 +-
 js/github.ml     | 2 +-
 3 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/CHANGES.md b/CHANGES.md
index 7341d1b..664a4ac 100644
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -4,6 +4,7 @@
 - Switch to dune-release instead of topkg (#224 @avsm)
 - Do not use deprecated `Yojson.Safe.json` (#224 @avsm)
 - Support lambda-term/zed 2.0.0 interfaces (#224 @avsm)
+- Use wrapped `js_of_ocaml` 3.4.0 interfaces (@avsm)
 
 ## 4.0.0 (2018-12-11)
 
diff --git a/github-jsoo.opam b/github-jsoo.opam
index 1196a5c..283338b 100644
--- a/github-jsoo.opam
+++ b/github-jsoo.opam
@@ -26,7 +26,7 @@ depends: [
   "dune" {build}
   "cohttp" {>= "0.99.0"}
   "cohttp-lwt-jsoo" {>= "0.99.0"}
-  "js_of_ocaml-lwt"
+  "js_of_ocaml-lwt" {>="3.4.0"}
   "github"
 ]
 build: [
diff --git a/js/github.ml b/js/github.ml
index b189c56..e3f8c3f 100644
--- a/js/github.ml
+++ b/js/github.ml
@@ -17,7 +17,7 @@
 
 module Time = struct
   let now = Unix.gettimeofday
-  let sleep = Lwt_js.sleep
+  let sleep = Js_of_ocaml_lwt.Lwt_js.sleep
 end
 
 module Env = struct