DocumentPictureInPicture.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from document-picture-in-picture (webref). Do not edit.
module JSDOM.Generated.DocumentPictureInPicture
       (requestWindow, requestWindow_, getWindow, enter, DocumentPictureInPicture(..), gTypeDocumentPictureInPicture)
       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://developer.mozilla.org/docs/Web/API/DocumentPictureInPicture/requestWindow MDN DocumentPictureInPicture.requestWindow documentation>
requestWindow :: (MonadDOM m) => DocumentPictureInPicture -> Maybe DocumentPictureInPictureOptions -> m Window
requestWindow self options = liftDOM (((((self ^. jsf "requestWindow" [P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/DocumentPictureInPicture/requestWindow MDN DocumentPictureInPicture.requestWindow documentation>
requestWindow_ :: (MonadDOM m) => DocumentPictureInPicture -> Maybe DocumentPictureInPictureOptions -> m ()
requestWindow_ self options = liftDOM (void (((self ^. jsf "requestWindow" [P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)))

-- | <https://developer.mozilla.org/docs/Web/API/DocumentPictureInPicture/window MDN DocumentPictureInPicture.window documentation>
getWindow :: (MonadDOM m) => DocumentPictureInPicture -> m Window
getWindow self = liftDOM (((self ^. js "window") >>= fromJSValUnchecked))

-- | <https://wicg.github.io/document-picture-in-picture/#dom-documentpictureinpicture-onenter enter event>
enter :: EventName DocumentPictureInPicture DocumentPictureInPictureEvent
enter = unsafeEventName (toJSString "enter")