{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module JSDOM.Generated.GlobalEventHandlers
(abort, autocomplete, autocompleteerror, blur, canPlay,
canPlayThrough, change, click, contextMenu, cueChange, dblClick,
drag, dragEnd, dragEnter, dragLeave, dragOver, dragStart, drop,
durationChange, emptied, ended, error, focus, input, invalid,
keyDown, keyPress, keyUp, load, loadedData, loadedMetadata,
loadStart, mouseDown, mouseEnter, mouseLeave, mouseMove, mouseOut,
mouseOver, mouseUp, mouseWheel, pause, play, playing, progress,
rateChange, rejectionhandled, reset, resize, scroll, seeked,
seeking, select, stalled, submit, suspend, timeUpdate, toggle,
unhandledrejection, volumeChange, waiting, transitionEnd,
animationEnd, animationIteration, animationStart, search, wheel,
touchCancel, touchEnd, touchMove, touchStart, touchForcechange,
webKitMouseForcechanged, webKitMouseForcedown,
webKitMouseForcewillbegin, webKitMouseForceup,
webKitWillRevealBottom, webKitWillRevealLeft,
webKitWillRevealRight, webKitWillRevealTop,
GlobalEventHandlers(..), gTypeGlobalEventHandlers,
IsGlobalEventHandlers, toGlobalEventHandlers)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import qualified Prelude (error)
import Data.Typeable (Typeable)
import Data.Traversable (mapM)
import Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, asyncFunction, new, array, jsUndefined, (!), (!!))
import Data.Int (Int64)
import Data.Word (Word, Word64)
import JSDOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Enums
abort ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self UIEvent
abort = unsafeEventNameAsync (toJSString "abort")
autocomplete ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onautocomplete
autocomplete = unsafeEventName (toJSString "autocomplete")
autocompleteerror ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onautocompleteerror
autocompleteerror
= unsafeEventName (toJSString "autocompleteerror")
blur ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self FocusEvent
blur = unsafeEventNameAsync (toJSString "blur")
canPlay ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
canPlay = unsafeEventName (toJSString "canplay")
canPlayThrough ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
canPlayThrough = unsafeEventName (toJSString "canplaythrough")
change ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
change = unsafeEventName (toJSString "change")
click ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
click = unsafeEventName (toJSString "click")
contextMenu ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
contextMenu = unsafeEventName (toJSString "contextmenu")
cueChange ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
cueChange = unsafeEventName (toJSString "cuechange")
dblClick ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
dblClick = unsafeEventName (toJSString "dblclick")
drag ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
drag = unsafeEventName (toJSString "drag")
dragEnd ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
dragEnd = unsafeEventName (toJSString "dragend")
dragEnter ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
dragEnter = unsafeEventName (toJSString "dragenter")
dragLeave ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
dragLeave = unsafeEventName (toJSString "dragleave")
dragOver ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
dragOver = unsafeEventName (toJSString "dragover")
dragStart ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
dragStart = unsafeEventName (toJSString "dragstart")
drop ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
drop = unsafeEventName (toJSString "drop")
durationChange ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
durationChange = unsafeEventName (toJSString "durationchange")
emptied ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
emptied = unsafeEventName (toJSString "emptied")
ended ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
ended = unsafeEventName (toJSString "ended")
error ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self UIEvent
error = unsafeEventNameAsync (toJSString "error")
focus ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self FocusEvent
focus = unsafeEventNameAsync (toJSString "focus")
input ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
input = unsafeEventName (toJSString "input")
invalid ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
invalid = unsafeEventName (toJSString "invalid")
keyDown ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self KeyboardEvent
keyDown = unsafeEventName (toJSString "keydown")
keyPress ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self KeyboardEvent
keyPress = unsafeEventName (toJSString "keypress")
keyUp ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self KeyboardEvent
keyUp = unsafeEventName (toJSString "keyup")
load ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self UIEvent
load = unsafeEventNameAsync (toJSString "load")
loadedData ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
loadedData = unsafeEventName (toJSString "loadeddata")
loadedMetadata ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
loadedMetadata = unsafeEventName (toJSString "loadedmetadata")
loadStart ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self ProgressEvent
loadStart = unsafeEventNameAsync (toJSString "loadstart")
mouseDown ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseDown = unsafeEventName (toJSString "mousedown")
mouseEnter ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseEnter = unsafeEventName (toJSString "mouseenter")
mouseLeave ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseLeave = unsafeEventName (toJSString "mouseleave")
mouseMove ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseMove = unsafeEventName (toJSString "mousemove")
mouseOut ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseOut = unsafeEventName (toJSString "mouseout")
mouseOver ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseOver = unsafeEventName (toJSString "mouseover")
mouseUp ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseUp = unsafeEventName (toJSString "mouseup")
mouseWheel ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self MouseEvent
mouseWheel = unsafeEventName (toJSString "mousewheel")
pause ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
pause = unsafeEventName (toJSString "pause")
play ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
play = unsafeEventName (toJSString "play")
playing ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
playing = unsafeEventName (toJSString "playing")
progress ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self ProgressEvent
progress = unsafeEventNameAsync (toJSString "progress")
rateChange ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
rateChange = unsafeEventName (toJSString "ratechange")
rejectionhandled ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onrejectionhandled
rejectionhandled = unsafeEventName (toJSString "rejectionhandled")
reset ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
reset = unsafeEventName (toJSString "reset")
resize ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self UIEvent
resize = unsafeEventName (toJSString "resize")
scroll ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self UIEvent
scroll = unsafeEventName (toJSString "scroll")
seeked ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
seeked = unsafeEventName (toJSString "seeked")
seeking ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
seeking = unsafeEventName (toJSString "seeking")
select ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self UIEvent
select = unsafeEventName (toJSString "select")
stalled ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
stalled = unsafeEventName (toJSString "stalled")
submit ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
submit = unsafeEventName (toJSString "submit")
suspend ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
suspend = unsafeEventName (toJSString "suspend")
timeUpdate ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
timeUpdate = unsafeEventName (toJSString "timeupdate")
toggle ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self ontoggle
toggle = unsafeEventName (toJSString "toggle")
unhandledrejection ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onunhandledrejection
unhandledrejection
= unsafeEventName (toJSString "unhandledrejection")
volumeChange ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
volumeChange = unsafeEventName (toJSString "volumechange")
waiting ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
waiting = unsafeEventName (toJSString "waiting")
transitionEnd ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self TransitionEvent
transitionEnd = unsafeEventName (toJSString "transitionend")
animationEnd ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self AnimationEvent
animationEnd = unsafeEventName (toJSString "animationend")
animationIteration ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self AnimationEvent
animationIteration
= unsafeEventName (toJSString "animationiteration")
animationStart ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self AnimationEvent
animationStart = unsafeEventName (toJSString "animationstart")
search ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
search = unsafeEventName (toJSString "search")
wheel ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self WheelEvent
wheel = unsafeEventName (toJSString "wheel")
touchCancel ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self TouchEvent
touchCancel = unsafeEventName (toJSString "touchcancel")
touchEnd ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self TouchEvent
touchEnd = unsafeEventName (toJSString "touchend")
touchMove ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self TouchEvent
touchMove = unsafeEventName (toJSString "touchmove")
touchStart ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self TouchEvent
touchStart = unsafeEventName (toJSString "touchstart")
touchForcechange ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self ontouchforcechange
touchForcechange = unsafeEventName (toJSString "touchforcechange")
webKitMouseForcechanged ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onwebkitmouseforcechanged
webKitMouseForcechanged
= unsafeEventName (toJSString "webkitmouseforcechanged")
webKitMouseForcedown ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onwebkitmouseforcedown
webKitMouseForcedown
= unsafeEventName (toJSString "webkitmouseforcedown")
webKitMouseForcewillbegin ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onwebkitmouseforcewillbegin
webKitMouseForcewillbegin
= unsafeEventName (toJSString "webkitmouseforcewillbegin")
webKitMouseForceup ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self onwebkitmouseforceup
webKitMouseForceup
= unsafeEventName (toJSString "webkitmouseforceup")
webKitWillRevealBottom ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
webKitWillRevealBottom
= unsafeEventName (toJSString "webkitwillrevealbottom")
webKitWillRevealLeft ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
webKitWillRevealLeft
= unsafeEventName (toJSString "webkitwillrevealleft")
webKitWillRevealRight ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
webKitWillRevealRight
= unsafeEventName (toJSString "webkitwillrevealright")
webKitWillRevealTop ::
(IsGlobalEventHandlers self, IsEventTarget self) =>
EventName self Event
webKitWillRevealTop
= unsafeEventName (toJSString "webkitwillrevealtop")