StyleSheet.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from cssom-1 (webref). Do not edit.
module JSDOM.Generated.StyleSheet
       (getType, getHref, getHrefUnsafe, getHrefUnchecked, getOwnerNode, getOwnerNodeUnsafe, getOwnerNodeUnchecked, getParentStyleSheet, getParentStyleSheetUnsafe, getParentStyleSheetUnchecked, getTitle, getTitleUnsafe, getTitleUnchecked, getMedia, setDisabled, getDisabled, StyleSheet(..), gTypeStyleSheet, IsStyleSheet, toStyleSheet)
       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/StyleSheet/type MDN StyleSheet.type documentation>
getType :: (MonadDOM m, IsStyleSheet self, FromJSString result) => self -> m result
getType self = liftDOM ((((Types.toStyleSheet self) ^. js "type") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/href MDN StyleSheet.href documentation>
getHref :: (MonadDOM m, IsStyleSheet self, FromJSString result) => self -> m (Maybe result)
getHref self = liftDOM ((((Types.toStyleSheet self) ^. js "href") >>= fromMaybeJSString))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/href MDN StyleSheet.href documentation>
getHrefUnsafe :: (MonadDOM m, IsStyleSheet self, HasCallStack, FromJSString result) => self -> m result
getHrefUnsafe self = liftDOM (((((Types.toStyleSheet self) ^. js "href") >>= fromMaybeJSString) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/href MDN StyleSheet.href documentation>
getHrefUnchecked :: (MonadDOM m, IsStyleSheet self, FromJSString result) => self -> m result
getHrefUnchecked self = liftDOM ((((Types.toStyleSheet self) ^. js "href") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/ownerNode MDN StyleSheet.ownerNode documentation>
getOwnerNode :: (MonadDOM m, IsStyleSheet self) => self -> m (Maybe ElementOrProcessingInstruction)
getOwnerNode self = liftDOM ((((Types.toStyleSheet self) ^. js "ownerNode") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/ownerNode MDN StyleSheet.ownerNode documentation>
getOwnerNodeUnsafe :: (MonadDOM m, IsStyleSheet self, HasCallStack) => self -> m ElementOrProcessingInstruction
getOwnerNodeUnsafe self = liftDOM (((((Types.toStyleSheet self) ^. js "ownerNode") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/ownerNode MDN StyleSheet.ownerNode documentation>
getOwnerNodeUnchecked :: (MonadDOM m, IsStyleSheet self) => self -> m ElementOrProcessingInstruction
getOwnerNodeUnchecked self = liftDOM ((((Types.toStyleSheet self) ^. js "ownerNode") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/parentStyleSheet MDN StyleSheet.parentStyleSheet documentation>
getParentStyleSheet :: (MonadDOM m, IsStyleSheet self) => self -> m (Maybe CSSStyleSheet)
getParentStyleSheet self = liftDOM ((((Types.toStyleSheet self) ^. js "parentStyleSheet") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/parentStyleSheet MDN StyleSheet.parentStyleSheet documentation>
getParentStyleSheetUnsafe :: (MonadDOM m, IsStyleSheet self, HasCallStack) => self -> m CSSStyleSheet
getParentStyleSheetUnsafe self = liftDOM (((((Types.toStyleSheet self) ^. js "parentStyleSheet") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/parentStyleSheet MDN StyleSheet.parentStyleSheet documentation>
getParentStyleSheetUnchecked :: (MonadDOM m, IsStyleSheet self) => self -> m CSSStyleSheet
getParentStyleSheetUnchecked self = liftDOM ((((Types.toStyleSheet self) ^. js "parentStyleSheet") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/title MDN StyleSheet.title documentation>
getTitle :: (MonadDOM m, IsStyleSheet self, FromJSString result) => self -> m (Maybe result)
getTitle self = liftDOM ((((Types.toStyleSheet self) ^. js "title") >>= fromMaybeJSString))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/title MDN StyleSheet.title documentation>
getTitleUnsafe :: (MonadDOM m, IsStyleSheet self, HasCallStack, FromJSString result) => self -> m result
getTitleUnsafe self = liftDOM (((((Types.toStyleSheet self) ^. js "title") >>= fromMaybeJSString) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/title MDN StyleSheet.title documentation>
getTitleUnchecked :: (MonadDOM m, IsStyleSheet self, FromJSString result) => self -> m result
getTitleUnchecked self = liftDOM ((((Types.toStyleSheet self) ^. js "title") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/media MDN StyleSheet.media documentation>
getMedia :: (MonadDOM m, IsStyleSheet self) => self -> m MediaList
getMedia self = liftDOM ((((Types.toStyleSheet self) ^. js "media") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/disabled MDN StyleSheet.disabled documentation>
setDisabled :: (MonadDOM m, IsStyleSheet self) => self -> Bool -> m ()
setDisabled self val = liftDOM (void ((Types.toStyleSheet self) ^. jss "disabled" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/StyleSheet/disabled MDN StyleSheet.disabled documentation>
getDisabled :: (MonadDOM m, IsStyleSheet self) => self -> m Bool
getDisabled self = liftDOM ((((Types.toStyleSheet self) ^. js "disabled") >>= valToBool))