packages feed

jsaddle-dom-0.10.0.0: src/JSDOM/Generated/StylePropertyMap.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from css-typed-om-1 (webref). Do not edit.
module JSDOM.Generated.StylePropertyMap
       (append, clear, delete, set, StylePropertyMap(..), gTypeStylePropertyMap)
       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/StylePropertyMap/append MDN StylePropertyMap.append documentation>
append :: (MonadDOM m, ToJSString property, IsCSSStyleValueOrString values) => StylePropertyMap -> property -> [values] -> m ()
append self property values = liftDOM (void (self ^. jsf "append" ([toJSVal property] ++ P.map toJSVal values)))

-- | <https://developer.mozilla.org/docs/Web/API/StylePropertyMap/clear MDN StylePropertyMap.clear documentation>
clear :: (MonadDOM m) => StylePropertyMap -> m ()
clear self = liftDOM (void (self ^. jsf "clear" ()))

-- | <https://developer.mozilla.org/docs/Web/API/StylePropertyMap/delete MDN StylePropertyMap.delete documentation>
delete :: (MonadDOM m, ToJSString property) => StylePropertyMap -> property -> m ()
delete self property = liftDOM (void (self ^. jsf "delete" [toJSVal property]))

-- | <https://developer.mozilla.org/docs/Web/API/StylePropertyMap/set MDN StylePropertyMap.set documentation>
set :: (MonadDOM m, ToJSString property, IsCSSStyleValueOrString values) => StylePropertyMap -> property -> [values] -> m ()
set self property values = liftDOM (void (self ^. jsf "set" ([toJSVal property] ++ P.map toJSVal values)))