module GI.WebKit2WebExtension.Objects.DOMHTMLSelectElement
(
DOMHTMLSelectElement(..) ,
DOMHTMLSelectElementK ,
toDOMHTMLSelectElement ,
noDOMHTMLSelectElement ,
dOMHTMLSelectElementAdd ,
dOMHTMLSelectElementGetAutofocus ,
dOMHTMLSelectElementGetDisabled ,
dOMHTMLSelectElementGetForm ,
dOMHTMLSelectElementGetLength ,
dOMHTMLSelectElementGetMultiple ,
dOMHTMLSelectElementGetName ,
dOMHTMLSelectElementGetOptions ,
dOMHTMLSelectElementGetSelectType ,
dOMHTMLSelectElementGetSelectedIndex ,
dOMHTMLSelectElementGetSize ,
dOMHTMLSelectElementGetValue ,
dOMHTMLSelectElementGetWillValidate ,
dOMHTMLSelectElementItem ,
dOMHTMLSelectElementNamedItem ,
dOMHTMLSelectElementRemove ,
dOMHTMLSelectElementSetAutofocus ,
dOMHTMLSelectElementSetDisabled ,
dOMHTMLSelectElementSetLength ,
dOMHTMLSelectElementSetMultiple ,
dOMHTMLSelectElementSetName ,
dOMHTMLSelectElementSetSelectedIndex ,
dOMHTMLSelectElementSetSize ,
dOMHTMLSelectElementSetValue ,
DOMHTMLSelectElementAutofocusPropertyInfo,
constructDOMHTMLSelectElementAutofocus ,
getDOMHTMLSelectElementAutofocus ,
setDOMHTMLSelectElementAutofocus ,
DOMHTMLSelectElementDisabledPropertyInfo,
constructDOMHTMLSelectElementDisabled ,
getDOMHTMLSelectElementDisabled ,
setDOMHTMLSelectElementDisabled ,
DOMHTMLSelectElementFormPropertyInfo ,
getDOMHTMLSelectElementForm ,
DOMHTMLSelectElementLabelsPropertyInfo ,
getDOMHTMLSelectElementLabels ,
DOMHTMLSelectElementLengthPropertyInfo ,
constructDOMHTMLSelectElementLength ,
getDOMHTMLSelectElementLength ,
setDOMHTMLSelectElementLength ,
DOMHTMLSelectElementMultiplePropertyInfo,
constructDOMHTMLSelectElementMultiple ,
getDOMHTMLSelectElementMultiple ,
setDOMHTMLSelectElementMultiple ,
DOMHTMLSelectElementNamePropertyInfo ,
constructDOMHTMLSelectElementName ,
getDOMHTMLSelectElementName ,
setDOMHTMLSelectElementName ,
DOMHTMLSelectElementOptionsPropertyInfo ,
getDOMHTMLSelectElementOptions ,
DOMHTMLSelectElementRequiredPropertyInfo,
constructDOMHTMLSelectElementRequired ,
getDOMHTMLSelectElementRequired ,
setDOMHTMLSelectElementRequired ,
DOMHTMLSelectElementSelectedIndexPropertyInfo,
constructDOMHTMLSelectElementSelectedIndex,
getDOMHTMLSelectElementSelectedIndex ,
setDOMHTMLSelectElementSelectedIndex ,
DOMHTMLSelectElementSelectedOptionsPropertyInfo,
getDOMHTMLSelectElementSelectedOptions ,
DOMHTMLSelectElementSizePropertyInfo ,
constructDOMHTMLSelectElementSize ,
getDOMHTMLSelectElementSize ,
setDOMHTMLSelectElementSize ,
DOMHTMLSelectElementTypePropertyInfo ,
getDOMHTMLSelectElementType ,
DOMHTMLSelectElementValidationMessagePropertyInfo,
getDOMHTMLSelectElementValidationMessage,
DOMHTMLSelectElementValuePropertyInfo ,
constructDOMHTMLSelectElementValue ,
getDOMHTMLSelectElementValue ,
setDOMHTMLSelectElementValue ,
DOMHTMLSelectElementWillValidatePropertyInfo,
getDOMHTMLSelectElementWillValidate ,
) 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 DOMHTMLSelectElement = DOMHTMLSelectElement (ForeignPtr DOMHTMLSelectElement)
foreign import ccall "webkit_dom_html_select_element_get_type"
c_webkit_dom_html_select_element_get_type :: IO GType
type instance ParentTypes DOMHTMLSelectElement = DOMHTMLSelectElementParentTypes
type DOMHTMLSelectElementParentTypes = '[DOMHTMLElement, DOMElement, DOMNode, DOMObject, GObject.Object, DOMEventTarget]
instance GObject DOMHTMLSelectElement where
gobjectIsInitiallyUnowned _ = False
gobjectType _ = c_webkit_dom_html_select_element_get_type
class GObject o => DOMHTMLSelectElementK o
instance (GObject o, IsDescendantOf DOMHTMLSelectElement o) => DOMHTMLSelectElementK o
toDOMHTMLSelectElement :: DOMHTMLSelectElementK o => o -> IO DOMHTMLSelectElement
toDOMHTMLSelectElement = unsafeCastTo DOMHTMLSelectElement
noDOMHTMLSelectElement :: Maybe DOMHTMLSelectElement
noDOMHTMLSelectElement = Nothing
getDOMHTMLSelectElementAutofocus :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool
getDOMHTMLSelectElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus"
setDOMHTMLSelectElementAutofocus :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()
setDOMHTMLSelectElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val
constructDOMHTMLSelectElementAutofocus :: Bool -> IO ([Char], GValue)
constructDOMHTMLSelectElementAutofocus val = constructObjectPropertyBool "autofocus" val
data DOMHTMLSelectElementAutofocusPropertyInfo
instance AttrInfo DOMHTMLSelectElementAutofocusPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementAutofocusPropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMHTMLSelectElementAutofocusPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementAutofocusPropertyInfo = Bool
type AttrLabel DOMHTMLSelectElementAutofocusPropertyInfo = "DOMHTMLSelectElement::autofocus"
attrGet _ = getDOMHTMLSelectElementAutofocus
attrSet _ = setDOMHTMLSelectElementAutofocus
attrConstruct _ = constructDOMHTMLSelectElementAutofocus
getDOMHTMLSelectElementDisabled :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool
getDOMHTMLSelectElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled"
setDOMHTMLSelectElementDisabled :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()
setDOMHTMLSelectElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val
constructDOMHTMLSelectElementDisabled :: Bool -> IO ([Char], GValue)
constructDOMHTMLSelectElementDisabled val = constructObjectPropertyBool "disabled" val
data DOMHTMLSelectElementDisabledPropertyInfo
instance AttrInfo DOMHTMLSelectElementDisabledPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementDisabledPropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMHTMLSelectElementDisabledPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementDisabledPropertyInfo = Bool
type AttrLabel DOMHTMLSelectElementDisabledPropertyInfo = "DOMHTMLSelectElement::disabled"
attrGet _ = getDOMHTMLSelectElementDisabled
attrSet _ = setDOMHTMLSelectElementDisabled
attrConstruct _ = constructDOMHTMLSelectElementDisabled
getDOMHTMLSelectElementForm :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMHTMLFormElement
getDOMHTMLSelectElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement
data DOMHTMLSelectElementFormPropertyInfo
instance AttrInfo DOMHTMLSelectElementFormPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementFormPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementFormPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLSelectElementFormPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementFormPropertyInfo = DOMHTMLFormElement
type AttrLabel DOMHTMLSelectElementFormPropertyInfo = "DOMHTMLSelectElement::form"
attrGet _ = getDOMHTMLSelectElementForm
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLSelectElementLabels :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMNodeList
getDOMHTMLSelectElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList
data DOMHTMLSelectElementLabelsPropertyInfo
instance AttrInfo DOMHTMLSelectElementLabelsPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementLabelsPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementLabelsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLSelectElementLabelsPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementLabelsPropertyInfo = DOMNodeList
type AttrLabel DOMHTMLSelectElementLabelsPropertyInfo = "DOMHTMLSelectElement::labels"
attrGet _ = getDOMHTMLSelectElementLabels
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLSelectElementLength :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Word64
getDOMHTMLSelectElementLength obj = liftIO $ getObjectPropertyUInt64 obj "length"
setDOMHTMLSelectElementLength :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Word64 -> m ()
setDOMHTMLSelectElementLength obj val = liftIO $ setObjectPropertyUInt64 obj "length" val
constructDOMHTMLSelectElementLength :: Word64 -> IO ([Char], GValue)
constructDOMHTMLSelectElementLength val = constructObjectPropertyUInt64 "length" val
data DOMHTMLSelectElementLengthPropertyInfo
instance AttrInfo DOMHTMLSelectElementLengthPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementLengthPropertyInfo = (~) Word64
type AttrBaseTypeConstraint DOMHTMLSelectElementLengthPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementLengthPropertyInfo = Word64
type AttrLabel DOMHTMLSelectElementLengthPropertyInfo = "DOMHTMLSelectElement::length"
attrGet _ = getDOMHTMLSelectElementLength
attrSet _ = setDOMHTMLSelectElementLength
attrConstruct _ = constructDOMHTMLSelectElementLength
getDOMHTMLSelectElementMultiple :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool
getDOMHTMLSelectElementMultiple obj = liftIO $ getObjectPropertyBool obj "multiple"
setDOMHTMLSelectElementMultiple :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()
setDOMHTMLSelectElementMultiple obj val = liftIO $ setObjectPropertyBool obj "multiple" val
constructDOMHTMLSelectElementMultiple :: Bool -> IO ([Char], GValue)
constructDOMHTMLSelectElementMultiple val = constructObjectPropertyBool "multiple" val
data DOMHTMLSelectElementMultiplePropertyInfo
instance AttrInfo DOMHTMLSelectElementMultiplePropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementMultiplePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementMultiplePropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMHTMLSelectElementMultiplePropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementMultiplePropertyInfo = Bool
type AttrLabel DOMHTMLSelectElementMultiplePropertyInfo = "DOMHTMLSelectElement::multiple"
attrGet _ = getDOMHTMLSelectElementMultiple
attrSet _ = setDOMHTMLSelectElementMultiple
attrConstruct _ = constructDOMHTMLSelectElementMultiple
getDOMHTMLSelectElementName :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text
getDOMHTMLSelectElementName obj = liftIO $ getObjectPropertyString obj "name"
setDOMHTMLSelectElementName :: (MonadIO m, DOMHTMLSelectElementK o) => o -> T.Text -> m ()
setDOMHTMLSelectElementName obj val = liftIO $ setObjectPropertyString obj "name" val
constructDOMHTMLSelectElementName :: T.Text -> IO ([Char], GValue)
constructDOMHTMLSelectElementName val = constructObjectPropertyString "name" val
data DOMHTMLSelectElementNamePropertyInfo
instance AttrInfo DOMHTMLSelectElementNamePropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLSelectElementNamePropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementNamePropertyInfo = T.Text
type AttrLabel DOMHTMLSelectElementNamePropertyInfo = "DOMHTMLSelectElement::name"
attrGet _ = getDOMHTMLSelectElementName
attrSet _ = setDOMHTMLSelectElementName
attrConstruct _ = constructDOMHTMLSelectElementName
getDOMHTMLSelectElementOptions :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMHTMLOptionsCollection
getDOMHTMLSelectElementOptions obj = liftIO $ getObjectPropertyObject obj "options" DOMHTMLOptionsCollection
data DOMHTMLSelectElementOptionsPropertyInfo
instance AttrInfo DOMHTMLSelectElementOptionsPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementOptionsPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementOptionsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLSelectElementOptionsPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementOptionsPropertyInfo = DOMHTMLOptionsCollection
type AttrLabel DOMHTMLSelectElementOptionsPropertyInfo = "DOMHTMLSelectElement::options"
attrGet _ = getDOMHTMLSelectElementOptions
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLSelectElementRequired :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool
getDOMHTMLSelectElementRequired obj = liftIO $ getObjectPropertyBool obj "required"
setDOMHTMLSelectElementRequired :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Bool -> m ()
setDOMHTMLSelectElementRequired obj val = liftIO $ setObjectPropertyBool obj "required" val
constructDOMHTMLSelectElementRequired :: Bool -> IO ([Char], GValue)
constructDOMHTMLSelectElementRequired val = constructObjectPropertyBool "required" val
data DOMHTMLSelectElementRequiredPropertyInfo
instance AttrInfo DOMHTMLSelectElementRequiredPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementRequiredPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementRequiredPropertyInfo = (~) Bool
type AttrBaseTypeConstraint DOMHTMLSelectElementRequiredPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementRequiredPropertyInfo = Bool
type AttrLabel DOMHTMLSelectElementRequiredPropertyInfo = "DOMHTMLSelectElement::required"
attrGet _ = getDOMHTMLSelectElementRequired
attrSet _ = setDOMHTMLSelectElementRequired
attrConstruct _ = constructDOMHTMLSelectElementRequired
getDOMHTMLSelectElementSelectedIndex :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Int64
getDOMHTMLSelectElementSelectedIndex obj = liftIO $ getObjectPropertyInt64 obj "selected-index"
setDOMHTMLSelectElementSelectedIndex :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Int64 -> m ()
setDOMHTMLSelectElementSelectedIndex obj val = liftIO $ setObjectPropertyInt64 obj "selected-index" val
constructDOMHTMLSelectElementSelectedIndex :: Int64 -> IO ([Char], GValue)
constructDOMHTMLSelectElementSelectedIndex val = constructObjectPropertyInt64 "selected-index" val
data DOMHTMLSelectElementSelectedIndexPropertyInfo
instance AttrInfo DOMHTMLSelectElementSelectedIndexPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementSelectedIndexPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementSelectedIndexPropertyInfo = (~) Int64
type AttrBaseTypeConstraint DOMHTMLSelectElementSelectedIndexPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementSelectedIndexPropertyInfo = Int64
type AttrLabel DOMHTMLSelectElementSelectedIndexPropertyInfo = "DOMHTMLSelectElement::selected-index"
attrGet _ = getDOMHTMLSelectElementSelectedIndex
attrSet _ = setDOMHTMLSelectElementSelectedIndex
attrConstruct _ = constructDOMHTMLSelectElementSelectedIndex
getDOMHTMLSelectElementSelectedOptions :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m DOMHTMLCollection
getDOMHTMLSelectElementSelectedOptions obj = liftIO $ getObjectPropertyObject obj "selected-options" DOMHTMLCollection
data DOMHTMLSelectElementSelectedOptionsPropertyInfo
instance AttrInfo DOMHTMLSelectElementSelectedOptionsPropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementSelectedOptionsPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementSelectedOptionsPropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLSelectElementSelectedOptionsPropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementSelectedOptionsPropertyInfo = DOMHTMLCollection
type AttrLabel DOMHTMLSelectElementSelectedOptionsPropertyInfo = "DOMHTMLSelectElement::selected-options"
attrGet _ = getDOMHTMLSelectElementSelectedOptions
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLSelectElementSize :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Int64
getDOMHTMLSelectElementSize obj = liftIO $ getObjectPropertyInt64 obj "size"
setDOMHTMLSelectElementSize :: (MonadIO m, DOMHTMLSelectElementK o) => o -> Int64 -> m ()
setDOMHTMLSelectElementSize obj val = liftIO $ setObjectPropertyInt64 obj "size" val
constructDOMHTMLSelectElementSize :: Int64 -> IO ([Char], GValue)
constructDOMHTMLSelectElementSize val = constructObjectPropertyInt64 "size" val
data DOMHTMLSelectElementSizePropertyInfo
instance AttrInfo DOMHTMLSelectElementSizePropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementSizePropertyInfo = (~) Int64
type AttrBaseTypeConstraint DOMHTMLSelectElementSizePropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementSizePropertyInfo = Int64
type AttrLabel DOMHTMLSelectElementSizePropertyInfo = "DOMHTMLSelectElement::size"
attrGet _ = getDOMHTMLSelectElementSize
attrSet _ = setDOMHTMLSelectElementSize
attrConstruct _ = constructDOMHTMLSelectElementSize
getDOMHTMLSelectElementType :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text
getDOMHTMLSelectElementType obj = liftIO $ getObjectPropertyString obj "type"
data DOMHTMLSelectElementTypePropertyInfo
instance AttrInfo DOMHTMLSelectElementTypePropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementTypePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementTypePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLSelectElementTypePropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementTypePropertyInfo = T.Text
type AttrLabel DOMHTMLSelectElementTypePropertyInfo = "DOMHTMLSelectElement::type"
attrGet _ = getDOMHTMLSelectElementType
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLSelectElementValidationMessage :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text
getDOMHTMLSelectElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message"
data DOMHTMLSelectElementValidationMessagePropertyInfo
instance AttrInfo DOMHTMLSelectElementValidationMessagePropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementValidationMessagePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementValidationMessagePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLSelectElementValidationMessagePropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementValidationMessagePropertyInfo = T.Text
type AttrLabel DOMHTMLSelectElementValidationMessagePropertyInfo = "DOMHTMLSelectElement::validation-message"
attrGet _ = getDOMHTMLSelectElementValidationMessage
attrSet _ = undefined
attrConstruct _ = undefined
getDOMHTMLSelectElementValue :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m T.Text
getDOMHTMLSelectElementValue obj = liftIO $ getObjectPropertyString obj "value"
setDOMHTMLSelectElementValue :: (MonadIO m, DOMHTMLSelectElementK o) => o -> T.Text -> m ()
setDOMHTMLSelectElementValue obj val = liftIO $ setObjectPropertyString obj "value" val
constructDOMHTMLSelectElementValue :: T.Text -> IO ([Char], GValue)
constructDOMHTMLSelectElementValue val = constructObjectPropertyString "value" val
data DOMHTMLSelectElementValuePropertyInfo
instance AttrInfo DOMHTMLSelectElementValuePropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementValuePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint DOMHTMLSelectElementValuePropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementValuePropertyInfo = T.Text
type AttrLabel DOMHTMLSelectElementValuePropertyInfo = "DOMHTMLSelectElement::value"
attrGet _ = getDOMHTMLSelectElementValue
attrSet _ = setDOMHTMLSelectElementValue
attrConstruct _ = constructDOMHTMLSelectElementValue
getDOMHTMLSelectElementWillValidate :: (MonadIO m, DOMHTMLSelectElementK o) => o -> m Bool
getDOMHTMLSelectElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate"
data DOMHTMLSelectElementWillValidatePropertyInfo
instance AttrInfo DOMHTMLSelectElementWillValidatePropertyInfo where
type AttrAllowedOps DOMHTMLSelectElementWillValidatePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint DOMHTMLSelectElementWillValidatePropertyInfo = (~) ()
type AttrBaseTypeConstraint DOMHTMLSelectElementWillValidatePropertyInfo = DOMHTMLSelectElementK
type AttrGetType DOMHTMLSelectElementWillValidatePropertyInfo = Bool
type AttrLabel DOMHTMLSelectElementWillValidatePropertyInfo = "DOMHTMLSelectElement::will-validate"
attrGet _ = getDOMHTMLSelectElementWillValidate
attrSet _ = undefined
attrConstruct _ = undefined
type instance AttributeList DOMHTMLSelectElement = DOMHTMLSelectElementAttributeList
type DOMHTMLSelectElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLSelectElementAutofocusPropertyInfo), '("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), '("disabled", DOMHTMLSelectElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLSelectElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLSelectElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLSelectElementLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("multiple", DOMHTMLSelectElementMultiplePropertyInfo), '("name", DOMHTMLSelectElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("options", DOMHTMLSelectElementOptionsPropertyInfo), '("outer-html", DOMElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("required", DOMHTMLSelectElementRequiredPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("selected-index", DOMHTMLSelectElementSelectedIndexPropertyInfo), '("selected-options", DOMHTMLSelectElementSelectedOptionsPropertyInfo), '("size", DOMHTMLSelectElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLSelectElementTypePropertyInfo), '("validation-message", DOMHTMLSelectElementValidationMessagePropertyInfo), '("value", DOMHTMLSelectElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLSelectElementWillValidatePropertyInfo)] :: [(Symbol, *)])
type instance SignalList DOMHTMLSelectElement = DOMHTMLSelectElementSignalList
type DOMHTMLSelectElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_dom_html_select_element_add" webkit_dom_html_select_element_add ::
Ptr DOMHTMLSelectElement ->
Ptr DOMHTMLElement ->
Ptr DOMHTMLElement ->
Ptr (Ptr GError) ->
IO ()
dOMHTMLSelectElementAdd ::
(MonadIO m, DOMHTMLSelectElementK a, DOMHTMLElementK b, DOMHTMLElementK c) =>
a ->
b ->
c ->
m ()
dOMHTMLSelectElementAdd _obj element before = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let element' = unsafeManagedPtrCastPtr element
let before' = unsafeManagedPtrCastPtr before
onException (do
propagateGError $ webkit_dom_html_select_element_add _obj' element' before'
touchManagedPtr _obj
touchManagedPtr element
touchManagedPtr before
return ()
) (do
return ()
)
foreign import ccall "webkit_dom_html_select_element_get_autofocus" webkit_dom_html_select_element_get_autofocus ::
Ptr DOMHTMLSelectElement ->
IO CInt
dOMHTMLSelectElementGetAutofocus ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m Bool
dOMHTMLSelectElementGetAutofocus _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_autofocus _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_disabled" webkit_dom_html_select_element_get_disabled ::
Ptr DOMHTMLSelectElement ->
IO CInt
dOMHTMLSelectElementGetDisabled ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m Bool
dOMHTMLSelectElementGetDisabled _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_disabled _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_form" webkit_dom_html_select_element_get_form ::
Ptr DOMHTMLSelectElement ->
IO (Ptr DOMHTMLFormElement)
dOMHTMLSelectElementGetForm ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m DOMHTMLFormElement
dOMHTMLSelectElementGetForm _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_form _obj'
checkUnexpectedReturnNULL "webkit_dom_html_select_element_get_form" result
result' <- (newObject DOMHTMLFormElement) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_length" webkit_dom_html_select_element_get_length ::
Ptr DOMHTMLSelectElement ->
IO Word64
dOMHTMLSelectElementGetLength ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m Word64
dOMHTMLSelectElementGetLength _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_length _obj'
touchManagedPtr _obj
return result
foreign import ccall "webkit_dom_html_select_element_get_multiple" webkit_dom_html_select_element_get_multiple ::
Ptr DOMHTMLSelectElement ->
IO CInt
dOMHTMLSelectElementGetMultiple ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m Bool
dOMHTMLSelectElementGetMultiple _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_multiple _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_name" webkit_dom_html_select_element_get_name ::
Ptr DOMHTMLSelectElement ->
IO CString
dOMHTMLSelectElementGetName ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m T.Text
dOMHTMLSelectElementGetName _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_name _obj'
checkUnexpectedReturnNULL "webkit_dom_html_select_element_get_name" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_options" webkit_dom_html_select_element_get_options ::
Ptr DOMHTMLSelectElement ->
IO (Ptr DOMHTMLOptionsCollection)
dOMHTMLSelectElementGetOptions ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m DOMHTMLOptionsCollection
dOMHTMLSelectElementGetOptions _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_options _obj'
checkUnexpectedReturnNULL "webkit_dom_html_select_element_get_options" result
result' <- (wrapObject DOMHTMLOptionsCollection) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_select_type" webkit_dom_html_select_element_get_select_type ::
Ptr DOMHTMLSelectElement ->
IO CString
dOMHTMLSelectElementGetSelectType ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m T.Text
dOMHTMLSelectElementGetSelectType _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_select_type _obj'
checkUnexpectedReturnNULL "webkit_dom_html_select_element_get_select_type" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_selected_index" webkit_dom_html_select_element_get_selected_index ::
Ptr DOMHTMLSelectElement ->
IO Int64
dOMHTMLSelectElementGetSelectedIndex ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m Int64
dOMHTMLSelectElementGetSelectedIndex _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_selected_index _obj'
touchManagedPtr _obj
return result
foreign import ccall "webkit_dom_html_select_element_get_size" webkit_dom_html_select_element_get_size ::
Ptr DOMHTMLSelectElement ->
IO Int64
dOMHTMLSelectElementGetSize ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m Int64
dOMHTMLSelectElementGetSize _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_size _obj'
touchManagedPtr _obj
return result
foreign import ccall "webkit_dom_html_select_element_get_value" webkit_dom_html_select_element_get_value ::
Ptr DOMHTMLSelectElement ->
IO CString
dOMHTMLSelectElementGetValue ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m T.Text
dOMHTMLSelectElementGetValue _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_value _obj'
checkUnexpectedReturnNULL "webkit_dom_html_select_element_get_value" result
result' <- cstringToText result
freeMem result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_get_will_validate" webkit_dom_html_select_element_get_will_validate ::
Ptr DOMHTMLSelectElement ->
IO CInt
dOMHTMLSelectElementGetWillValidate ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
m Bool
dOMHTMLSelectElementGetWillValidate _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_get_will_validate _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_item" webkit_dom_html_select_element_item ::
Ptr DOMHTMLSelectElement ->
Word64 ->
IO (Ptr DOMNode)
dOMHTMLSelectElementItem ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Word64 ->
m DOMNode
dOMHTMLSelectElementItem _obj index = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_dom_html_select_element_item _obj' index
checkUnexpectedReturnNULL "webkit_dom_html_select_element_item" result
result' <- (newObject DOMNode) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_dom_html_select_element_named_item" webkit_dom_html_select_element_named_item ::
Ptr DOMHTMLSelectElement ->
CString ->
IO (Ptr DOMNode)
dOMHTMLSelectElementNamedItem ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
T.Text ->
m DOMNode
dOMHTMLSelectElementNamedItem _obj name = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
name' <- textToCString name
result <- webkit_dom_html_select_element_named_item _obj' name'
checkUnexpectedReturnNULL "webkit_dom_html_select_element_named_item" result
result' <- (newObject DOMNode) result
touchManagedPtr _obj
freeMem name'
return result'
foreign import ccall "webkit_dom_html_select_element_remove" webkit_dom_html_select_element_remove ::
Ptr DOMHTMLSelectElement ->
Int64 ->
IO ()
dOMHTMLSelectElementRemove ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Int64 ->
m ()
dOMHTMLSelectElementRemove _obj index = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_html_select_element_remove _obj' index
touchManagedPtr _obj
return ()
foreign import ccall "webkit_dom_html_select_element_set_autofocus" webkit_dom_html_select_element_set_autofocus ::
Ptr DOMHTMLSelectElement ->
CInt ->
IO ()
dOMHTMLSelectElementSetAutofocus ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Bool ->
m ()
dOMHTMLSelectElementSetAutofocus _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let value' = (fromIntegral . fromEnum) value
webkit_dom_html_select_element_set_autofocus _obj' value'
touchManagedPtr _obj
return ()
foreign import ccall "webkit_dom_html_select_element_set_disabled" webkit_dom_html_select_element_set_disabled ::
Ptr DOMHTMLSelectElement ->
CInt ->
IO ()
dOMHTMLSelectElementSetDisabled ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Bool ->
m ()
dOMHTMLSelectElementSetDisabled _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let value' = (fromIntegral . fromEnum) value
webkit_dom_html_select_element_set_disabled _obj' value'
touchManagedPtr _obj
return ()
foreign import ccall "webkit_dom_html_select_element_set_length" webkit_dom_html_select_element_set_length ::
Ptr DOMHTMLSelectElement ->
Word64 ->
Ptr (Ptr GError) ->
IO ()
dOMHTMLSelectElementSetLength ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Word64 ->
m ()
dOMHTMLSelectElementSetLength _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
onException (do
propagateGError $ webkit_dom_html_select_element_set_length _obj' value
touchManagedPtr _obj
return ()
) (do
return ()
)
foreign import ccall "webkit_dom_html_select_element_set_multiple" webkit_dom_html_select_element_set_multiple ::
Ptr DOMHTMLSelectElement ->
CInt ->
IO ()
dOMHTMLSelectElementSetMultiple ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Bool ->
m ()
dOMHTMLSelectElementSetMultiple _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let value' = (fromIntegral . fromEnum) value
webkit_dom_html_select_element_set_multiple _obj' value'
touchManagedPtr _obj
return ()
foreign import ccall "webkit_dom_html_select_element_set_name" webkit_dom_html_select_element_set_name ::
Ptr DOMHTMLSelectElement ->
CString ->
IO ()
dOMHTMLSelectElementSetName ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLSelectElementSetName _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_select_element_set_name _obj' value'
touchManagedPtr _obj
freeMem value'
return ()
foreign import ccall "webkit_dom_html_select_element_set_selected_index" webkit_dom_html_select_element_set_selected_index ::
Ptr DOMHTMLSelectElement ->
Int64 ->
IO ()
dOMHTMLSelectElementSetSelectedIndex ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Int64 ->
m ()
dOMHTMLSelectElementSetSelectedIndex _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_html_select_element_set_selected_index _obj' value
touchManagedPtr _obj
return ()
foreign import ccall "webkit_dom_html_select_element_set_size" webkit_dom_html_select_element_set_size ::
Ptr DOMHTMLSelectElement ->
Int64 ->
IO ()
dOMHTMLSelectElementSetSize ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
Int64 ->
m ()
dOMHTMLSelectElementSetSize _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
webkit_dom_html_select_element_set_size _obj' value
touchManagedPtr _obj
return ()
foreign import ccall "webkit_dom_html_select_element_set_value" webkit_dom_html_select_element_set_value ::
Ptr DOMHTMLSelectElement ->
CString ->
IO ()
dOMHTMLSelectElementSetValue ::
(MonadIO m, DOMHTMLSelectElementK a) =>
a ->
T.Text ->
m ()
dOMHTMLSelectElementSetValue _obj value = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
value' <- textToCString value
webkit_dom_html_select_element_set_value _obj' value'
touchManagedPtr _obj
freeMem value'
return ()