{-# LANGUAGE PatternSynonyms #-} -- For HasCallStack compatibility {-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} module JSDOM.Generated.WindowEventHandlers (beforeUnload, hashChange, languagechange, message, offline, online, pageHide, pageShow, popState, storage, unload, orientationChange, WindowEventHandlers(..), gTypeWindowEventHandlers, IsWindowEventHandlers, toWindowEventHandlers) 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 -- | beforeUnload :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self BeforeUnloadEvent beforeUnload = unsafeEventName (toJSString "beforeunload") -- | hashChange :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self HashChangeEvent hashChange = unsafeEventName (toJSString "hashchange") -- | languagechange :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event languagechange = unsafeEventName (toJSString "languagechange") -- | message :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self MessageEvent message = unsafeEventNameAsync (toJSString "message") -- | offline :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event offline = unsafeEventName (toJSString "offline") -- | online :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event online = unsafeEventName (toJSString "online") -- | pageHide :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PageTransitionEvent pageHide = unsafeEventName (toJSString "pagehide") -- | pageShow :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PageTransitionEvent pageShow = unsafeEventName (toJSString "pageshow") -- | popState :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self PopStateEvent popState = unsafeEventName (toJSString "popstate") -- | storage :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self StorageEvent storage = unsafeEventName (toJSString "storage") -- | unload :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self UIEvent unload = unsafeEventName (toJSString "unload") -- | orientationChange :: (IsWindowEventHandlers self, IsEventTarget self) => EventName self Event orientationChange = unsafeEventName (toJSString "orientationchange")