module GI.WebKit2WebExtension.Objects.DOMHTMLFormElement
(
DOMHTMLFormElement(..) ,
DOMHTMLFormElementK ,
toDOMHTMLFormElement ,
noDOMHTMLFormElement ,
dOMHTMLFormElementGetAcceptCharset ,
dOMHTMLFormElementGetAction ,
dOMHTMLFormElementGetElements ,
dOMHTMLFormElementGetEncoding ,
dOMHTMLFormElementGetEnctype ,
dOMHTMLFormElementGetLength ,
dOMHTMLFormElementGetMethod ,
dOMHTMLFormElementGetName ,
dOMHTMLFormElementGetTarget ,
dOMHTMLFormElementReset ,
dOMHTMLFormElementSetAcceptCharset ,
dOMHTMLFormElementSetAction ,
dOMHTMLFormElementSetEncoding ,
dOMHTMLFormElementSetEnctype ,
dOMHTMLFormElementSetMethod ,
dOMHTMLFormElementSetName ,
dOMHTMLFormElementSetTarget ,
dOMHTMLFormElementSubmit ,
DOMHTMLFormElementAcceptCharsetPropertyInfo,
constructDOMHTMLFormElementAcceptCharset,
getDOMHTMLFormElementAcceptCharset ,
setDOMHTMLFormElementAcceptCharset ,
DOMHTMLFormElementActionPropertyInfo ,
constructDOMHTMLFormElementAction ,
getDOMHTMLFormElementAction ,
setDOMHTMLFormElementAction ,
DOMHTMLFormElementAutocapitalizePropertyInfo,
constructDOMHTMLFormElementAutocapitalize,
getDOMHTMLFormElementAutocapitalize ,
setDOMHTMLFormElementAutocapitalize ,
DOMHTMLFormElementAutocompletePropertyInfo,
constructDOMHTMLFormElementAutocomplete ,
getDOMHTMLFormElementAutocomplete ,
setDOMHTMLFormElementAutocomplete ,
DOMHTMLFormElementAutocorrectPropertyInfo,
constructDOMHTMLFormElementAutocorrect ,
getDOMHTMLFormElementAutocorrect ,
setDOMHTMLFormElementAutocorrect ,
DOMHTMLFormElementElementsPropertyInfo ,
getDOMHTMLFormElementElements ,
DOMHTMLFormElementEncodingPropertyInfo ,
constructDOMHTMLFormElementEncoding ,
getDOMHTMLFormElementEncoding ,
setDOMHTMLFormElementEncoding ,
DOMHTMLFormElementEnctypePropertyInfo ,
constructDOMHTMLFormElementEnctype ,
getDOMHTMLFormElementEnctype ,
setDOMHTMLFormElementEnctype ,
DOMHTMLFormElementLengthPropertyInfo ,
getDOMHTMLFormElementLength ,
DOMHTMLFormElementMethodPropertyInfo ,
constructDOMHTMLFormElementMethod ,
getDOMHTMLFormElementMethod ,
setDOMHTMLFormElementMethod ,
DOMHTMLFormElementNamePropertyInfo ,
constructDOMHTMLFormElementName ,
getDOMHTMLFormElementName ,
setDOMHTMLFormElementName ,
DOMHTMLFormElementNoValidatePropertyInfo,
constructDOMHTMLFormElementNoValidate ,
getDOMHTMLFormElementNoValidate ,
setDOMHTMLFormElementNoValidate ,
DOMHTMLFormElementTargetPropertyInfo ,
constructDOMHTMLFormElementTarget ,
getDOMHTMLFormElementTarget ,
setDOMHTMLFormElementTarget ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import GI.WebKit2WebExtension.Types
import GI.WebKit2WebExtension.Callbacks
import qualified GI.GObject as GObject
newtype DOMHTMLFormElement = DOMHTMLFormElement (ForeignPtr DOMHTMLFormElement)
foreign import ccall "webkit_dom_html_form_element_get_type"
c_webkit_dom_html_form_element_get_type :: IO GType
type instance ParentTypes DOMHTMLFormElement = DOMHTMLFormElementParentTypes
type DOMHTMLFormElementParentTypes = '[DOMHTMLElement, DOMElement, DOMNode, DOMObject, GObject.Object, DOMEventTarget]
instance GObject DOMHTMLFormElement where
gobjectIsInitiallyUnowned _ = False
gobjectType _ = c_webkit_dom_html_form_element_get_type
class GObject o => DOMHTMLFormElementK o
instance (GObject o, IsDescendantOf DOMHTMLFormElement o) => DOMHTMLFormElementK o
toDOMHTMLFormElement :: DOMHTMLFormElementK o => o -> IO DOMHTMLFormElement
toDOMHTMLFormElement = unsafeCastTo DOMHTMLFormElement
noDOMHTMLFormElement :: Maybe DOMHTMLFormElement
noDOMHTMLFormElement = Nothing
getDOMHTMLFormElementAcceptCharset :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementAcceptCharset obj = liftIO $ getObjectPropertyString obj "accept-charset"
setDOMHTMLFormElementAcceptCharset :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementAcceptCharset obj val = liftIO $ setObjectPropertyString obj "accept-charset" val
constructDOMHTMLFormElementAcceptCharset :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementAcceptCharset val = constructObjectPropertyString "accept-charset" val
data DOMHTMLFormElementAcceptCharsetPropertyInfo
instance AttrInfo DOMHTMLFormElementAcceptCharsetPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementAcceptCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementAcceptCharsetPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementAcceptCharsetPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementAcceptCharsetPropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementAcceptCharsetPropertyInfo = "DOMHTMLFormElement::accept-charset"
attrGet _ = getDOMHTMLFormElementAcceptCharset
attrSet _ = setDOMHTMLFormElementAcceptCharset
attrConstruct _ = constructDOMHTMLFormElementAcceptCharset
getDOMHTMLFormElementAction :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementAction obj = liftIO $ getObjectPropertyString obj "action"
setDOMHTMLFormElementAction :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementAction obj val = liftIO $ setObjectPropertyString obj "action" val
constructDOMHTMLFormElementAction :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementAction val = constructObjectPropertyString "action" val
data DOMHTMLFormElementActionPropertyInfo
instance AttrInfo DOMHTMLFormElementActionPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementActionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementActionPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementActionPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementActionPropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementActionPropertyInfo = "DOMHTMLFormElement::action"
attrGet _ = getDOMHTMLFormElementAction
attrSet _ = setDOMHTMLFormElementAction
attrConstruct _ = constructDOMHTMLFormElementAction
getDOMHTMLFormElementAutocapitalize :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementAutocapitalize obj = liftIO $ getObjectPropertyString obj "autocapitalize"
setDOMHTMLFormElementAutocapitalize :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementAutocapitalize obj val = liftIO $ setObjectPropertyString obj "autocapitalize" val
constructDOMHTMLFormElementAutocapitalize :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementAutocapitalize val = constructObjectPropertyString "autocapitalize" val
data DOMHTMLFormElementAutocapitalizePropertyInfo
instance AttrInfo DOMHTMLFormElementAutocapitalizePropertyInfo where
type AttrAllowedOps DOMHTMLFormElementAutocapitalizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementAutocapitalizePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementAutocapitalizePropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementAutocapitalizePropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementAutocapitalizePropertyInfo = "DOMHTMLFormElement::autocapitalize"
attrGet _ = getDOMHTMLFormElementAutocapitalize
attrSet _ = setDOMHTMLFormElementAutocapitalize
attrConstruct _ = constructDOMHTMLFormElementAutocapitalize
getDOMHTMLFormElementAutocomplete :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementAutocomplete obj = liftIO $ getObjectPropertyString obj "autocomplete"
setDOMHTMLFormElementAutocomplete :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementAutocomplete obj val = liftIO $ setObjectPropertyString obj "autocomplete" val
constructDOMHTMLFormElementAutocomplete :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementAutocomplete val = constructObjectPropertyString "autocomplete" val
data DOMHTMLFormElementAutocompletePropertyInfo
instance AttrInfo DOMHTMLFormElementAutocompletePropertyInfo where
type AttrAllowedOps DOMHTMLFormElementAutocompletePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementAutocompletePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementAutocompletePropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementAutocompletePropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementAutocompletePropertyInfo = "DOMHTMLFormElement::autocomplete"
attrGet _ = getDOMHTMLFormElementAutocomplete
attrSet _ = setDOMHTMLFormElementAutocomplete
attrConstruct _ = constructDOMHTMLFormElementAutocomplete
getDOMHTMLFormElementAutocorrect :: (MonadIO m, DOMHTMLFormElementK o) => o -> m Bool
getDOMHTMLFormElementAutocorrect obj = liftIO $ getObjectPropertyBool obj "autocorrect"
setDOMHTMLFormElementAutocorrect :: (MonadIO m, DOMHTMLFormElementK o) => o -> Bool -> m ()
setDOMHTMLFormElementAutocorrect obj val = liftIO $ setObjectPropertyBool obj "autocorrect" val
constructDOMHTMLFormElementAutocorrect :: Bool -> IO ([Char], GValue)
constructDOMHTMLFormElementAutocorrect val = constructObjectPropertyBool "autocorrect" val
data DOMHTMLFormElementAutocorrectPropertyInfo
instance AttrInfo DOMHTMLFormElementAutocorrectPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementAutocorrectPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementAutocorrectPropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMHTMLFormElementAutocorrectPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementAutocorrectPropertyInfo = Bool
type AttrLabel DOMHTMLFormElementAutocorrectPropertyInfo = "DOMHTMLFormElement::autocorrect"
attrGet _ = getDOMHTMLFormElementAutocorrect
attrSet _ = setDOMHTMLFormElementAutocorrect
attrConstruct _ = constructDOMHTMLFormElementAutocorrect
getDOMHTMLFormElementElements :: (MonadIO m, DOMHTMLFormElementK o) => o -> m DOMHTMLCollection
getDOMHTMLFormElementElements obj = liftIO $ getObjectPropertyObject obj "elements" DOMHTMLCollection
data DOMHTMLFormElementElementsPropertyInfo
instance AttrInfo DOMHTMLFormElementElementsPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementElementsPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementElementsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLFormElementElementsPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementElementsPropertyInfo = DOMHTMLCollection
type AttrLabel DOMHTMLFormElementElementsPropertyInfo = "DOMHTMLFormElement::elements"
attrGet _ = getDOMHTMLFormElementElements
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLFormElementEncoding :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementEncoding obj = liftIO $ getObjectPropertyString obj "encoding"
setDOMHTMLFormElementEncoding :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementEncoding obj val = liftIO $ setObjectPropertyString obj "encoding" val
constructDOMHTMLFormElementEncoding :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementEncoding val = constructObjectPropertyString "encoding" val
data DOMHTMLFormElementEncodingPropertyInfo
instance AttrInfo DOMHTMLFormElementEncodingPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementEncodingPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementEncodingPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementEncodingPropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementEncodingPropertyInfo = "DOMHTMLFormElement::encoding"
attrGet _ = getDOMHTMLFormElementEncoding
attrSet _ = setDOMHTMLFormElementEncoding
attrConstruct _ = constructDOMHTMLFormElementEncoding
getDOMHTMLFormElementEnctype :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementEnctype obj = liftIO $ getObjectPropertyString obj "enctype"
setDOMHTMLFormElementEnctype :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementEnctype obj val = liftIO $ setObjectPropertyString obj "enctype" val
constructDOMHTMLFormElementEnctype :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementEnctype val = constructObjectPropertyString "enctype" val
data DOMHTMLFormElementEnctypePropertyInfo
instance AttrInfo DOMHTMLFormElementEnctypePropertyInfo where
type AttrAllowedOps DOMHTMLFormElementEnctypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementEnctypePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementEnctypePropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementEnctypePropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementEnctypePropertyInfo = "DOMHTMLFormElement::enctype"
attrGet _ = getDOMHTMLFormElementEnctype
attrSet _ = setDOMHTMLFormElementEnctype
attrConstruct _ = constructDOMHTMLFormElementEnctype
getDOMHTMLFormElementLength :: (MonadIO m, DOMHTMLFormElementK o) => o -> m Int64
getDOMHTMLFormElementLength obj = liftIO $ getObjectPropertyInt64 obj "length"
data DOMHTMLFormElementLengthPropertyInfo
instance AttrInfo DOMHTMLFormElementLengthPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementLengthPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementLengthPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLFormElementLengthPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementLengthPropertyInfo = Int64
type AttrLabel DOMHTMLFormElementLengthPropertyInfo = "DOMHTMLFormElement::length"
attrGet _ = getDOMHTMLFormElementLength
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLFormElementMethod :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementMethod obj = liftIO $ getObjectPropertyString obj "method"
setDOMHTMLFormElementMethod :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementMethod obj val = liftIO $ setObjectPropertyString obj "method" val
constructDOMHTMLFormElementMethod :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementMethod val = constructObjectPropertyString "method" val
data DOMHTMLFormElementMethodPropertyInfo
instance AttrInfo DOMHTMLFormElementMethodPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementMethodPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementMethodPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementMethodPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementMethodPropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementMethodPropertyInfo = "DOMHTMLFormElement::method"
attrGet _ = getDOMHTMLFormElementMethod
attrSet _ = setDOMHTMLFormElementMethod
attrConstruct _ = constructDOMHTMLFormElementMethod
getDOMHTMLFormElementName :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementName obj = liftIO $ getObjectPropertyString obj "name"
setDOMHTMLFormElementName :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementName obj val = liftIO $ setObjectPropertyString obj "name" val
constructDOMHTMLFormElementName :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementName val = constructObjectPropertyString "name" val
data DOMHTMLFormElementNamePropertyInfo
instance AttrInfo DOMHTMLFormElementNamePropertyInfo where
type AttrAllowedOps DOMHTMLFormElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementNamePropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementNamePropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementNamePropertyInfo = "DOMHTMLFormElement::name"
attrGet _ = getDOMHTMLFormElementName
attrSet _ = setDOMHTMLFormElementName
attrConstruct _ = constructDOMHTMLFormElementName
getDOMHTMLFormElementNoValidate :: (MonadIO m, DOMHTMLFormElementK o) => o -> m Bool
getDOMHTMLFormElementNoValidate obj = liftIO $ getObjectPropertyBool obj "no-validate"
setDOMHTMLFormElementNoValidate :: (MonadIO m, DOMHTMLFormElementK o) => o -> Bool -> m ()
setDOMHTMLFormElementNoValidate obj val = liftIO $ setObjectPropertyBool obj "no-validate" val
constructDOMHTMLFormElementNoValidate :: Bool -> IO ([Char], GValue)
constructDOMHTMLFormElementNoValidate val = constructObjectPropertyBool "no-validate" val
data DOMHTMLFormElementNoValidatePropertyInfo
instance AttrInfo DOMHTMLFormElementNoValidatePropertyInfo where
type AttrAllowedOps DOMHTMLFormElementNoValidatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementNoValidatePropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMHTMLFormElementNoValidatePropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementNoValidatePropertyInfo = Bool
type AttrLabel DOMHTMLFormElementNoValidatePropertyInfo = "DOMHTMLFormElement::no-validate"
attrGet _ = getDOMHTMLFormElementNoValidate
attrSet _ = setDOMHTMLFormElementNoValidate
attrConstruct _ = constructDOMHTMLFormElementNoValidate
getDOMHTMLFormElementTarget :: (MonadIO m, DOMHTMLFormElementK o) => o -> m T.Text
getDOMHTMLFormElementTarget obj = liftIO $ getObjectPropertyString obj "target"
setDOMHTMLFormElementTarget :: (MonadIO m, DOMHTMLFormElementK o) => o -> T.Text -> m ()
setDOMHTMLFormElementTarget obj val = liftIO $ setObjectPropertyString obj "target" val
constructDOMHTMLFormElementTarget :: T.Text -> IO ([Char], GValue)
constructDOMHTMLFormElementTarget val = constructObjectPropertyString "target" val
data DOMHTMLFormElementTargetPropertyInfo
instance AttrInfo DOMHTMLFormElementTargetPropertyInfo where
type AttrAllowedOps DOMHTMLFormElementTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLFormElementTargetPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLFormElementTargetPropertyInfo = DOMHTMLFormElementK
type AttrGetType DOMHTMLFormElementTargetPropertyInfo = T.Text
type AttrLabel DOMHTMLFormElementTargetPropertyInfo = "DOMHTMLFormElement::target"
attrGet _ = getDOMHTMLFormElementTarget
attrSet _ = setDOMHTMLFormElementTarget
attrConstruct _ = constructDOMHTMLFormElementTarget
type instance AttributeList DOMHTMLFormElement = DOMHTMLFormElementAttributeList
type DOMHTMLFormElementAttributeList = ('[ '("accept-charset", DOMHTMLFormElementAcceptCharsetPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("action", DOMHTMLFormElementActionPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLFormElementAutocapitalizePropertyInfo), '("autocomplete", DOMHTMLFormElementAutocompletePropertyInfo), '("autocorrect", DOMHTMLFormElementAutocorrectPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMElementChildrenPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("elements", DOMHTMLFormElementElementsPropertyInfo), '("encoding", DOMHTMLFormElementEncodingPropertyInfo), '("enctype", DOMHTMLFormElementEnctypePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLFormElementLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("method", DOMHTMLFormElementMethodPropertyInfo), '("name", DOMHTMLFormElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-validate", DOMHTMLFormElementNoValidatePropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLFormElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)])
type instance SignalList DOMHTMLFormElement = DOMHTMLFormElementSignalList
type DOMHTMLFormElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_html_form_element_get_accept_charset" webkit_dom_html_form_element_get_accept_charset ::
Ptr DOMHTMLFormElement ->
IO CString
dOMHTMLFormElementGetAcceptCharset ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m T.Text
dOMHTMLFormElementGetAcceptCharset _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_accept_charset _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_accept_charset" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_get_action" webkit_dom_html_form_element_get_action ::
Ptr DOMHTMLFormElement ->
IO CString
dOMHTMLFormElementGetAction ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m T.Text
dOMHTMLFormElementGetAction _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_action _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_action" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_get_elements" webkit_dom_html_form_element_get_elements ::
Ptr DOMHTMLFormElement ->
IO (Ptr DOMHTMLCollection)
dOMHTMLFormElementGetElements ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m DOMHTMLCollection
dOMHTMLFormElementGetElements _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_elements _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_elements" result
result' <- (wrapObject DOMHTMLCollection) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_get_encoding" webkit_dom_html_form_element_get_encoding ::
Ptr DOMHTMLFormElement ->
IO CString
dOMHTMLFormElementGetEncoding ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m T.Text
dOMHTMLFormElementGetEncoding _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_encoding _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_encoding" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_get_enctype" webkit_dom_html_form_element_get_enctype ::
Ptr DOMHTMLFormElement ->
IO CString
dOMHTMLFormElementGetEnctype ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m T.Text
dOMHTMLFormElementGetEnctype _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_enctype _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_enctype" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_get_length" webkit_dom_html_form_element_get_length ::
Ptr DOMHTMLFormElement ->
IO Int64
dOMHTMLFormElementGetLength ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m Int64
dOMHTMLFormElementGetLength _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_length _obj'
touchManagedPtr _obj
return result
foreign import ccall "webkit_dom_html_form_element_get_method" webkit_dom_html_form_element_get_method ::
Ptr DOMHTMLFormElement ->
IO CString
dOMHTMLFormElementGetMethod ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m T.Text
dOMHTMLFormElementGetMethod _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_method _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_method" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_get_name" webkit_dom_html_form_element_get_name ::
Ptr DOMHTMLFormElement ->
IO CString
dOMHTMLFormElementGetName ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m T.Text
dOMHTMLFormElementGetName _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_name _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_name" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_get_target" webkit_dom_html_form_element_get_target ::
Ptr DOMHTMLFormElement ->
IO CString
dOMHTMLFormElementGetTarget ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m T.Text
dOMHTMLFormElementGetTarget _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_form_element_get_target _obj'
checkUnexpectedReturnNULL "webkit_dom_html_form_element_get_target" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_form_element_reset" webkit_dom_html_form_element_reset ::
Ptr DOMHTMLFormElement ->
IO ()
dOMHTMLFormElementReset ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m ()
dOMHTMLFormElementReset _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_html_form_element_reset _obj'
touchManagedPtr _obj
return ()
foreign import ccall "webkit_dom_html_form_element_set_accept_charset" webkit_dom_html_form_element_set_accept_charset ::
Ptr DOMHTMLFormElement ->
CString ->
IO ()
dOMHTMLFormElementSetAcceptCharset ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLFormElementSetAcceptCharset _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_form_element_set_accept_charset _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_form_element_set_action" webkit_dom_html_form_element_set_action ::
Ptr DOMHTMLFormElement ->
CString ->
IO ()
dOMHTMLFormElementSetAction ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLFormElementSetAction _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_form_element_set_action _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_form_element_set_encoding" webkit_dom_html_form_element_set_encoding ::
Ptr DOMHTMLFormElement ->
CString ->
IO ()
dOMHTMLFormElementSetEncoding ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLFormElementSetEncoding _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_form_element_set_encoding _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_form_element_set_enctype" webkit_dom_html_form_element_set_enctype ::
Ptr DOMHTMLFormElement ->
CString ->
IO ()
dOMHTMLFormElementSetEnctype ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLFormElementSetEnctype _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_form_element_set_enctype _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_form_element_set_method" webkit_dom_html_form_element_set_method ::
Ptr DOMHTMLFormElement ->
CString ->
IO ()
dOMHTMLFormElementSetMethod ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLFormElementSetMethod _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_form_element_set_method _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_form_element_set_name" webkit_dom_html_form_element_set_name ::
Ptr DOMHTMLFormElement ->
CString ->
IO ()
dOMHTMLFormElementSetName ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLFormElementSetName _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_form_element_set_name _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_form_element_set_target" webkit_dom_html_form_element_set_target ::
Ptr DOMHTMLFormElement ->
CString ->
IO ()
dOMHTMLFormElementSetTarget ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLFormElementSetTarget _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_form_element_set_target _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_form_element_submit" webkit_dom_html_form_element_submit ::
Ptr DOMHTMLFormElement ->
IO ()
dOMHTMLFormElementSubmit ::
(MonadIO m, DOMHTMLFormElementK a) =>
a ->
m ()
dOMHTMLFormElementSubmit _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_html_form_element_submit _obj'
touchManagedPtr _obj
return ()