HTMLButtonElement.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.HTMLButtonElement
       (checkValidity, checkValidity_, reportValidity, reportValidity_, setCustomValidity, setCommand, getCommand, setCommandForElement, getCommandForElement, getCommandForElementUnsafe, getCommandForElementUnchecked, setDisabled, getDisabled, getForm, getFormUnsafe, getFormUnchecked, setFormAction, getFormAction, setFormEnctype, getFormEnctype, setFormMethod, getFormMethod, setFormNoValidate, getFormNoValidate, setFormTarget, getFormTarget, setName, getName, setType, getType, setValue, getValue, getWillValidate, getValidity, getValidationMessage, getLabels, HTMLButtonElement(..), gTypeHTMLButtonElement)
       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/HTMLButtonElement/checkValidity MDN HTMLButtonElement.checkValidity documentation>
checkValidity :: (MonadDOM m) => HTMLButtonElement -> m Bool
checkValidity self = liftDOM (((self ^. jsf "checkValidity" ()) >>= valToBool))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/reportValidity MDN HTMLButtonElement.reportValidity documentation>
reportValidity :: (MonadDOM m) => HTMLButtonElement -> m Bool
reportValidity self = liftDOM (((self ^. jsf "reportValidity" ()) >>= valToBool))

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

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/command MDN HTMLButtonElement.command documentation>
setCommand :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setCommand self val = liftDOM (void (self ^. jss "command" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/commandForElement MDN HTMLButtonElement.commandForElement documentation>
setCommandForElement :: (MonadDOM m, IsElement val) => HTMLButtonElement -> Maybe val -> m ()
setCommandForElement self val = liftDOM (void (self ^. jss "commandForElement" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/commandForElement MDN HTMLButtonElement.commandForElement documentation>
getCommandForElementUnsafe :: (MonadDOM m, HasCallStack) => HTMLButtonElement -> m Element
getCommandForElementUnsafe self = liftDOM ((((self ^. js "commandForElement") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

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

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

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/form MDN HTMLButtonElement.form documentation>
getForm :: (MonadDOM m) => HTMLButtonElement -> m (Maybe HTMLFormElement)
getForm self = liftDOM (((self ^. js "form") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/form MDN HTMLButtonElement.form documentation>
getFormUnsafe :: (MonadDOM m, HasCallStack) => HTMLButtonElement -> m HTMLFormElement
getFormUnsafe self = liftDOM ((((self ^. js "form") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/form MDN HTMLButtonElement.form documentation>
getFormUnchecked :: (MonadDOM m) => HTMLButtonElement -> m HTMLFormElement
getFormUnchecked self = liftDOM (((self ^. js "form") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/formAction MDN HTMLButtonElement.formAction documentation>
setFormAction :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setFormAction self val = liftDOM (void (self ^. jss "formAction" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/formEnctype MDN HTMLButtonElement.formEnctype documentation>
setFormEnctype :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setFormEnctype self val = liftDOM (void (self ^. jss "formEnctype" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/formMethod MDN HTMLButtonElement.formMethod documentation>
setFormMethod :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setFormMethod self val = liftDOM (void (self ^. jss "formMethod" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/formNoValidate MDN HTMLButtonElement.formNoValidate documentation>
setFormNoValidate :: (MonadDOM m) => HTMLButtonElement -> Bool -> m ()
setFormNoValidate self val = liftDOM (void (self ^. jss "formNoValidate" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/formTarget MDN HTMLButtonElement.formTarget documentation>
setFormTarget :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setFormTarget self val = liftDOM (void (self ^. jss "formTarget" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/name MDN HTMLButtonElement.name documentation>
setName :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setName self val = liftDOM (void (self ^. jss "name" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/type MDN HTMLButtonElement.type documentation>
setType :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setType self val = liftDOM (void (self ^. jss "type" (toJSVal val)))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/value MDN HTMLButtonElement.value documentation>
setValue :: (MonadDOM m, ToJSString val) => HTMLButtonElement -> val -> m ()
setValue self val = liftDOM (void (self ^. jss "value" (toJSVal val)))

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

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/validity MDN HTMLButtonElement.validity documentation>
getValidity :: (MonadDOM m) => HTMLButtonElement -> m ValidityState
getValidity self = liftDOM (((self ^. js "validity") >>= fromJSValUnchecked))

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

-- | <https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/labels MDN HTMLButtonElement.labels documentation>
getLabels :: (MonadDOM m) => HTMLButtonElement -> m NodeList
getLabels self = liftDOM (((self ^. js "labels") >>= fromJSValUnchecked))