CSSKeyframeRule.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from css-animations-1 (webref). Do not edit.
module JSDOM.Generated.CSSKeyframeRule
       (setKeyText, getKeyText, getStyle, CSSKeyframeRule(..), gTypeCSSKeyframeRule)
       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/CSSKeyframeRule/keyText MDN CSSKeyframeRule.keyText documentation>
setKeyText :: (MonadDOM m, ToJSString val) => CSSKeyframeRule -> val -> m ()
setKeyText self val = liftDOM (void (self ^. jss "keyText" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CSSKeyframeRule/keyText MDN CSSKeyframeRule.keyText documentation>
getKeyText :: (MonadDOM m, FromJSString result) => CSSKeyframeRule -> m result
getKeyText self = liftDOM (((self ^. js "keyText") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CSSKeyframeRule/style MDN CSSKeyframeRule.style documentation>
getStyle :: (MonadDOM m) => CSSKeyframeRule -> m CSSStyleProperties
getStyle self = liftDOM (((self ^. js "style") >>= fromJSValUnchecked))