WindowEventHandlers.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.WindowEventHandlers
       (afterprint, beforeprint, beforeUnload, hashChange, languagechange, message, messageerror, offline, online, pageHide, pagereveal, pageShow, pageswap, popState, rejectionhandled, storage, unhandledrejection, unload, gamepadconnected, gamepaddisconnected, WindowEventHandlers(..), gTypeWindowEventHandlers, IsWindowEventHandlers, toWindowEventHandlers)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onafterprint afterprint event>
afterprint :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event
afterprint = unsafeEventName (toJSString "afterprint")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onbeforeprint beforeprint event>
beforeprint :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event
beforeprint = unsafeEventName (toJSString "beforeprint")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onbeforeunload beforeunload event>
beforeUnload :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self BeforeUnloadEvent
beforeUnload = unsafeEventName (toJSString "beforeunload")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onhashchange hashchange event>
hashChange :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self HashChangeEvent
hashChange = unsafeEventName (toJSString "hashchange")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onlanguagechange languagechange event>
languagechange :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event
languagechange = unsafeEventName (toJSString "languagechange")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onmessage message event>
message :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self MessageEvent
message = unsafeEventNameAsync (toJSString "message")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onmessageerror messageerror event>
messageerror :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self MessageEvent
messageerror = unsafeEventName (toJSString "messageerror")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onoffline offline event>
offline :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event
offline = unsafeEventName (toJSString "offline")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-ononline online event>
online :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event
online = unsafeEventName (toJSString "online")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onpagehide pagehide event>
pageHide :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PageTransitionEvent
pageHide = unsafeEventName (toJSString "pagehide")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onpagereveal pagereveal event>
pagereveal :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PageRevealEvent
pagereveal = unsafeEventName (toJSString "pagereveal")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onpageshow pageshow event>
pageShow :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PageTransitionEvent
pageShow = unsafeEventName (toJSString "pageshow")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onpageswap pageswap event>
pageswap :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PageSwapEvent
pageswap = unsafeEventName (toJSString "pageswap")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onpopstate popstate event>
popState :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PopStateEvent
popState = unsafeEventName (toJSString "popstate")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onrejectionhandled rejectionhandled event>
rejectionhandled :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PromiseRejectionEvent
rejectionhandled = unsafeEventName (toJSString "rejectionhandled")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onstorage storage event>
storage :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self StorageEvent
storage = unsafeEventName (toJSString "storage")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onunhandledrejection unhandledrejection event>
unhandledrejection :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PromiseRejectionEvent
unhandledrejection = unsafeEventName (toJSString "unhandledrejection")

-- | <https://html.spec.whatwg.org/multipage/webappapis.html#handler-window-onunload unload event>
unload :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event
unload = unsafeEventName (toJSString "unload")

-- | <https://w3c.github.io/gamepad/#dom-windoweventhandlers-ongamepadconnected gamepadconnected event>
gamepadconnected :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self GamepadEvent
gamepadconnected = unsafeEventName (toJSString "gamepadconnected")

-- | <https://w3c.github.io/gamepad/#dom-windoweventhandlers-ongamepaddisconnected gamepaddisconnected event>
gamepaddisconnected :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self GamepadEvent
gamepaddisconnected = unsafeEventName (toJSString "gamepaddisconnected")