diff --git a/jsaddle-webkitgtk.cabal b/jsaddle-webkitgtk.cabal
--- a/jsaddle-webkitgtk.cabal
+++ b/jsaddle-webkitgtk.cabal
@@ -1,5 +1,5 @@
 name: jsaddle-webkitgtk
-version: 0.8.3.1
+version: 0.9.0.0
 cabal-version: >=1.10
 build-type: Simple
 license: MIT
@@ -32,7 +32,7 @@
         gi-webkit >=3.0.6 && <3.1,
         gi-javascriptcore >=3.0.6 && <3.1,
         haskell-gi-base >=0.20 && <0.21,
-        jsaddle >=0.8.0.0 && <0.9,
+        jsaddle >=0.9.0.0 && <0.10,
         text >=1.2.1.3 && <1.3,
         webkitgtk3-javascriptcore >=0.14.0.0 && <0.15
     if !os(windows)
diff --git a/src/Language/Javascript/JSaddle/WebKitGTK.hs b/src/Language/Javascript/JSaddle/WebKitGTK.hs
--- a/src/Language/Javascript/JSaddle/WebKitGTK.hs
+++ b/src/Language/Javascript/JSaddle/WebKitGTK.hs
@@ -185,7 +185,7 @@
             jsvalueprotect ctxRef result
             return result
 
-    (processResults, start) <- runJavaScript (\batch -> postGUIAsync $
+    (processResults, _, start) <- runJavaScript (\batch -> postGUIAsync $
         withJSContextRef ctx $ \ctxRef ->
             withJSString (decodeUtf8 . toStrict $ encode batch) $ \script -> do
                 val <- jsvaluemakestring ctxRef script
@@ -222,7 +222,7 @@
     , initState
     , "\nreturn function(batchJSON) {\n"
     , "  var batch = JSON.parse(batchJSON);\n"
-    , runBatch (\a -> "window.jsaddleCallback(JSON.stringify(" <> a <> "));\n")
+    , runBatch (\a -> "window.jsaddleCallback(JSON.stringify(" <> a <> "));\n") Nothing
     , "};\n"
     , "})()\n"
     ]