ghcjs-dom 0.0.8 → 0.0.9
raw patch · 2 files changed
+3/−4 lines, 2 files
Files
ghcjs-dom.cabal view
@@ -1,5 +1,5 @@ name: ghcjs-dom-version: 0.0.8+version: 0.0.9 cabal-version: >=1.10 build-type: Simple license: MIT
src/GHCJS/DOM/EventTargetClosures.hs view
@@ -7,7 +7,6 @@ import GHCJS.Types import GHCJS.Foreign import GHCJS.DOM.Types-import Control.Applicative ((<$>)) #ifdef ghcjs_HOST_OS foreign import javascript unsafe@@ -30,8 +29,8 @@ #endif eventTargetAddEventListener ::- (GObjectClass self, IsEvent event) =>- self -> String -> Bool -> (self -> event -> IO ()) -> IO (IO ())+ (GObjectClass self, ToJSString eventName, IsEvent event) =>+ self -> eventName -> Bool -> (self -> event -> IO ()) -> IO (IO ()) eventTargetAddEventListener self eventName bubble user = do callback <- syncCallback1 AlwaysRetain True $ \e -> user self (unsafeCastGObject $ GObject e) ghcjs_dom_event_target_add_event_listener