ShadowRoot.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from dom (webref). Do not edit.
module JSDOM.Generated.ShadowRoot
       (getHTML, getHTML_, setHTML, setHTMLUnsafe, getMode, getDelegatesFocus, getSerializable, getSlotAssignment, getClonable, getHost, setInnerHTML, getInnerHTML, ShadowRoot(..), gTypeShadowRoot)
       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/ShadowRoot/getHTML MDN ShadowRoot.getHTML documentation>
getHTML :: (MonadDOM m, FromJSString result) => ShadowRoot -> Maybe GetHTMLOptions -> m result
getHTML self options = liftDOM (((self ^. jsf "getHTML" [P.maybe (P.return jsUndefined) toJSVal options]) >>= fromJSValUnchecked))

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

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/setHTML MDN ShadowRoot.setHTML documentation>
setHTML :: (MonadDOM m, ToJSString html) => ShadowRoot -> html -> Maybe SetHTMLOptions -> m ()
setHTML self html options = liftDOM (void (self ^. jsf "setHTML" [toJSVal html, P.maybe (P.return jsUndefined) toJSVal options]))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/setHTMLUnsafe MDN ShadowRoot.setHTMLUnsafe documentation>
setHTMLUnsafe :: (MonadDOM m, IsTrustedHTMLOrString html, IsSetHTMLUnsafeOptionsOrTrustedHTMLParserOptions options) => ShadowRoot -> html -> Maybe options -> m ()
setHTMLUnsafe self html options = liftDOM (void (self ^. jsf "setHTMLUnsafe" [toJSVal html, P.maybe (P.return jsUndefined) toJSVal options]))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/mode MDN ShadowRoot.mode documentation>
getMode :: (MonadDOM m) => ShadowRoot -> m ShadowRootMode
getMode self = liftDOM (((self ^. js "mode") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/delegatesFocus MDN ShadowRoot.delegatesFocus documentation>
getDelegatesFocus :: (MonadDOM m) => ShadowRoot -> m Bool
getDelegatesFocus self = liftDOM (((self ^. js "delegatesFocus") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/serializable MDN ShadowRoot.serializable documentation>
getSerializable :: (MonadDOM m) => ShadowRoot -> m Bool
getSerializable self = liftDOM (((self ^. js "serializable") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/slotAssignment MDN ShadowRoot.slotAssignment documentation>
getSlotAssignment :: (MonadDOM m) => ShadowRoot -> m SlotAssignmentMode
getSlotAssignment self = liftDOM (((self ^. js "slotAssignment") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/clonable MDN ShadowRoot.clonable documentation>
getClonable :: (MonadDOM m) => ShadowRoot -> m Bool
getClonable self = liftDOM (((self ^. js "clonable") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/host MDN ShadowRoot.host documentation>
getHost :: (MonadDOM m) => ShadowRoot -> m Element
getHost self = liftDOM (((self ^. js "host") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/innerHTML MDN ShadowRoot.innerHTML documentation>
setInnerHTML :: (MonadDOM m, IsTrustedHTMLOrString val) => ShadowRoot -> val -> m ()
setInnerHTML self val = liftDOM (void (self ^. jss "innerHTML" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/ShadowRoot/innerHTML MDN ShadowRoot.innerHTML documentation>
getInnerHTML :: (MonadDOM m) => ShadowRoot -> m TrustedHTMLOrString
getInnerHTML self = liftDOM (((self ^. js "innerHTML") >>= fromJSValUnchecked))