WindowEventHandlers.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module JSDOM.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 Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.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")