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

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module JSDOM.Generated.CanvasTextDrawingStyles
       (setLang, getLang, setFont, getFont, setTextAlign, getTextAlign, setTextBaseline, getTextBaseline, setDirection, getDirection, setLetterSpacing, getLetterSpacing, setFontKerning, getFontKerning, setFontStretch, getFontStretch, setFontVariantCaps, getFontVariantCaps, setTextRendering, getTextRendering, setWordSpacing, getWordSpacing, CanvasTextDrawingStyles(..), gTypeCanvasTextDrawingStyles, IsCanvasTextDrawingStyles, toCanvasTextDrawingStyles)
       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/CanvasRenderingContext2D/lang MDN CanvasTextDrawingStyles.lang documentation>
setLang :: (MonadDOM m, IsCanvasTextDrawingStyles self, ToJSString val) => self -> val -> m ()
setLang self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "lang" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/lang MDN CanvasTextDrawingStyles.lang documentation>
getLang :: (MonadDOM m, IsCanvasTextDrawingStyles self, FromJSString result) => self -> m result
getLang self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "lang") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/font MDN CanvasTextDrawingStyles.font documentation>
setFont :: (MonadDOM m, IsCanvasTextDrawingStyles self, ToJSString val) => self -> val -> m ()
setFont self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "font" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/font MDN CanvasTextDrawingStyles.font documentation>
getFont :: (MonadDOM m, IsCanvasTextDrawingStyles self, FromJSString result) => self -> m result
getFont self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "font") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/textAlign MDN CanvasTextDrawingStyles.textAlign documentation>
setTextAlign :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> CanvasTextAlign -> m ()
setTextAlign self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "textAlign" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/textAlign MDN CanvasTextDrawingStyles.textAlign documentation>
getTextAlign :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> m CanvasTextAlign
getTextAlign self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "textAlign") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/textBaseline MDN CanvasTextDrawingStyles.textBaseline documentation>
setTextBaseline :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> CanvasTextBaseline -> m ()
setTextBaseline self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "textBaseline" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/textBaseline MDN CanvasTextDrawingStyles.textBaseline documentation>
getTextBaseline :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> m CanvasTextBaseline
getTextBaseline self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "textBaseline") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/direction MDN CanvasTextDrawingStyles.direction documentation>
setDirection :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> CanvasDirection -> m ()
setDirection self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "direction" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/direction MDN CanvasTextDrawingStyles.direction documentation>
getDirection :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> m CanvasDirection
getDirection self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "direction") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/letterSpacing MDN CanvasTextDrawingStyles.letterSpacing documentation>
setLetterSpacing :: (MonadDOM m, IsCanvasTextDrawingStyles self, ToJSString val) => self -> val -> m ()
setLetterSpacing self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "letterSpacing" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/letterSpacing MDN CanvasTextDrawingStyles.letterSpacing documentation>
getLetterSpacing :: (MonadDOM m, IsCanvasTextDrawingStyles self, FromJSString result) => self -> m result
getLetterSpacing self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "letterSpacing") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/fontKerning MDN CanvasTextDrawingStyles.fontKerning documentation>
setFontKerning :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> CanvasFontKerning -> m ()
setFontKerning self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "fontKerning" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/fontKerning MDN CanvasTextDrawingStyles.fontKerning documentation>
getFontKerning :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> m CanvasFontKerning
getFontKerning self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "fontKerning") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/fontStretch MDN CanvasTextDrawingStyles.fontStretch documentation>
setFontStretch :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> CanvasFontStretch -> m ()
setFontStretch self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "fontStretch" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/fontStretch MDN CanvasTextDrawingStyles.fontStretch documentation>
getFontStretch :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> m CanvasFontStretch
getFontStretch self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "fontStretch") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/fontVariantCaps MDN CanvasTextDrawingStyles.fontVariantCaps documentation>
setFontVariantCaps :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> CanvasFontVariantCaps -> m ()
setFontVariantCaps self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "fontVariantCaps" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/fontVariantCaps MDN CanvasTextDrawingStyles.fontVariantCaps documentation>
getFontVariantCaps :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> m CanvasFontVariantCaps
getFontVariantCaps self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "fontVariantCaps") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/textRendering MDN CanvasTextDrawingStyles.textRendering documentation>
setTextRendering :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> CanvasTextRendering -> m ()
setTextRendering self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "textRendering" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/textRendering MDN CanvasTextDrawingStyles.textRendering documentation>
getTextRendering :: (MonadDOM m, IsCanvasTextDrawingStyles self) => self -> m CanvasTextRendering
getTextRendering self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "textRendering") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/wordSpacing MDN CanvasTextDrawingStyles.wordSpacing documentation>
setWordSpacing :: (MonadDOM m, IsCanvasTextDrawingStyles self, ToJSString val) => self -> val -> m ()
setWordSpacing self val = liftDOM (void ((Types.toCanvasTextDrawingStyles self) ^. jss "wordSpacing" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/CanvasRenderingContext2D/wordSpacing MDN CanvasTextDrawingStyles.wordSpacing documentation>
getWordSpacing :: (MonadDOM m, IsCanvasTextDrawingStyles self, FromJSString result) => self -> m result
getWordSpacing self = liftDOM ((((Types.toCanvasTextDrawingStyles self) ^. js "wordSpacing") >>= fromJSValUnchecked))