#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
module GHCJS.DOM.HTMLInputElement
(ghcjs_dom_html_input_element_step_up, htmlInputElementStepUp,
ghcjs_dom_html_input_element_step_down, htmlInputElementStepDown,
ghcjs_dom_html_input_element_check_validity,
htmlInputElementCheckValidity,
ghcjs_dom_html_input_element_set_custom_validity,
htmlInputElementSetCustomValidity,
ghcjs_dom_html_input_element_select, htmlInputElementSelect,
ghcjs_dom_html_input_element_set_range_text,
htmlInputElementSetRangeText,
ghcjs_dom_html_input_element_set_range_text4,
htmlInputElementSetRangeText4,
ghcjs_dom_html_input_element_set_value_for_user,
htmlInputElementSetValueForUser,
ghcjs_dom_html_input_element_set_accept, htmlInputElementSetAccept,
ghcjs_dom_html_input_element_get_accept, htmlInputElementGetAccept,
ghcjs_dom_html_input_element_set_alt, htmlInputElementSetAlt,
ghcjs_dom_html_input_element_get_alt, htmlInputElementGetAlt,
ghcjs_dom_html_input_element_set_autocomplete,
htmlInputElementSetAutocomplete,
ghcjs_dom_html_input_element_get_autocomplete,
htmlInputElementGetAutocomplete,
ghcjs_dom_html_input_element_set_autofocus,
htmlInputElementSetAutofocus,
ghcjs_dom_html_input_element_get_autofocus,
htmlInputElementGetAutofocus,
ghcjs_dom_html_input_element_set_default_checked,
htmlInputElementSetDefaultChecked,
ghcjs_dom_html_input_element_get_default_checked,
htmlInputElementGetDefaultChecked,
ghcjs_dom_html_input_element_set_checked,
htmlInputElementSetChecked,
ghcjs_dom_html_input_element_get_checked,
htmlInputElementGetChecked,
ghcjs_dom_html_input_element_set_dir_name,
htmlInputElementSetDirName,
ghcjs_dom_html_input_element_get_dir_name,
htmlInputElementGetDirName,
ghcjs_dom_html_input_element_set_disabled,
htmlInputElementSetDisabled,
ghcjs_dom_html_input_element_get_disabled,
htmlInputElementGetDisabled, ghcjs_dom_html_input_element_get_form,
htmlInputElementGetForm, ghcjs_dom_html_input_element_set_files,
htmlInputElementSetFiles, ghcjs_dom_html_input_element_get_files,
htmlInputElementGetFiles,
ghcjs_dom_html_input_element_set_form_action,
htmlInputElementSetFormAction,
ghcjs_dom_html_input_element_get_form_action,
htmlInputElementGetFormAction,
ghcjs_dom_html_input_element_set_form_enctype,
htmlInputElementSetFormEnctype,
ghcjs_dom_html_input_element_get_form_enctype,
htmlInputElementGetFormEnctype,
ghcjs_dom_html_input_element_set_form_method,
htmlInputElementSetFormMethod,
ghcjs_dom_html_input_element_get_form_method,
htmlInputElementGetFormMethod,
ghcjs_dom_html_input_element_set_form_no_validate,
htmlInputElementSetFormNoValidate,
ghcjs_dom_html_input_element_get_form_no_validate,
htmlInputElementGetFormNoValidate,
ghcjs_dom_html_input_element_set_form_target,
htmlInputElementSetFormTarget,
ghcjs_dom_html_input_element_get_form_target,
htmlInputElementGetFormTarget,
ghcjs_dom_html_input_element_set_height, htmlInputElementSetHeight,
ghcjs_dom_html_input_element_get_height, htmlInputElementGetHeight,
ghcjs_dom_html_input_element_set_indeterminate,
htmlInputElementSetIndeterminate,
ghcjs_dom_html_input_element_get_indeterminate,
htmlInputElementGetIndeterminate,
ghcjs_dom_html_input_element_get_list, htmlInputElementGetList,
ghcjs_dom_html_input_element_set_max, htmlInputElementSetMax,
ghcjs_dom_html_input_element_get_max, htmlInputElementGetMax,
ghcjs_dom_html_input_element_set_max_length,
htmlInputElementSetMaxLength,
ghcjs_dom_html_input_element_get_max_length,
htmlInputElementGetMaxLength, ghcjs_dom_html_input_element_set_min,
htmlInputElementSetMin, ghcjs_dom_html_input_element_get_min,
htmlInputElementGetMin, ghcjs_dom_html_input_element_set_multiple,
htmlInputElementSetMultiple,
ghcjs_dom_html_input_element_get_multiple,
htmlInputElementGetMultiple, ghcjs_dom_html_input_element_set_name,
htmlInputElementSetName, ghcjs_dom_html_input_element_get_name,
htmlInputElementGetName, ghcjs_dom_html_input_element_set_pattern,
htmlInputElementSetPattern,
ghcjs_dom_html_input_element_get_pattern,
htmlInputElementGetPattern,
ghcjs_dom_html_input_element_set_placeholder,
htmlInputElementSetPlaceholder,
ghcjs_dom_html_input_element_get_placeholder,
htmlInputElementGetPlaceholder,
ghcjs_dom_html_input_element_set_read_only,
htmlInputElementSetReadOnly,
ghcjs_dom_html_input_element_get_read_only,
htmlInputElementGetReadOnly,
ghcjs_dom_html_input_element_set_required,
htmlInputElementSetRequired,
ghcjs_dom_html_input_element_get_required,
htmlInputElementGetRequired, ghcjs_dom_html_input_element_set_size,
htmlInputElementSetSize, ghcjs_dom_html_input_element_get_size,
htmlInputElementGetSize, ghcjs_dom_html_input_element_set_src,
htmlInputElementSetSrc, ghcjs_dom_html_input_element_get_src,
htmlInputElementGetSrc, ghcjs_dom_html_input_element_set_step,
htmlInputElementSetStep, ghcjs_dom_html_input_element_get_step,
htmlInputElementGetStep,
ghcjs_dom_html_input_element_set_default_value,
htmlInputElementSetDefaultValue,
ghcjs_dom_html_input_element_get_default_value,
htmlInputElementGetDefaultValue,
ghcjs_dom_html_input_element_set_value, htmlInputElementSetValue,
ghcjs_dom_html_input_element_get_value, htmlInputElementGetValue,
ghcjs_dom_html_input_element_set_value_as_number,
htmlInputElementSetValueAsNumber,
ghcjs_dom_html_input_element_get_value_as_number,
htmlInputElementGetValueAsNumber,
ghcjs_dom_html_input_element_set_width, htmlInputElementSetWidth,
ghcjs_dom_html_input_element_get_width, htmlInputElementGetWidth,
ghcjs_dom_html_input_element_get_will_validate,
htmlInputElementGetWillValidate,
ghcjs_dom_html_input_element_get_validity,
htmlInputElementGetValidity,
ghcjs_dom_html_input_element_get_validation_message,
htmlInputElementGetValidationMessage,
ghcjs_dom_html_input_element_get_labels, htmlInputElementGetLabels,
ghcjs_dom_html_input_element_set_align, htmlInputElementSetAlign,
ghcjs_dom_html_input_element_get_align, htmlInputElementGetAlign,
ghcjs_dom_html_input_element_set_use_map,
htmlInputElementSetUseMap,
ghcjs_dom_html_input_element_get_use_map,
htmlInputElementGetUseMap,
ghcjs_dom_html_input_element_set_incremental,
htmlInputElementSetIncremental,
ghcjs_dom_html_input_element_get_incremental,
htmlInputElementGetIncremental,
ghcjs_dom_html_input_element_set_autocorrect,
htmlInputElementSetAutocorrect,
ghcjs_dom_html_input_element_get_autocorrect,
htmlInputElementGetAutocorrect,
ghcjs_dom_html_input_element_set_autocapitalize,
htmlInputElementSetAutocapitalize,
ghcjs_dom_html_input_element_get_autocapitalize,
htmlInputElementGetAutocapitalize,
ghcjs_dom_html_input_element_set_capture,
htmlInputElementSetCapture,
ghcjs_dom_html_input_element_get_capture,
htmlInputElementGetCapture, HTMLInputElement, IsHTMLInputElement,
castToHTMLInputElement, gTypeHTMLInputElement, toHTMLInputElement)
where
import GHCJS.Types
import GHCJS.Foreign
import GHCJS.Marshal
import Data.Int
import Data.Word
import GHCJS.DOM.Types
import Control.Applicative ((<$>))
import GHCJS.DOM.EventM
foreign import javascript unsafe "$1[\"stepUp\"]($2)"
ghcjs_dom_html_input_element_step_up ::
JSRef HTMLInputElement -> Int -> IO ()
htmlInputElementStepUp ::
(IsHTMLInputElement self) => self -> Int -> IO ()
htmlInputElementStepUp self n
= ghcjs_dom_html_input_element_step_up
(unHTMLInputElement (toHTMLInputElement self))
n
foreign import javascript unsafe "$1[\"stepDown\"]($2)"
ghcjs_dom_html_input_element_step_down ::
JSRef HTMLInputElement -> Int -> IO ()
htmlInputElementStepDown ::
(IsHTMLInputElement self) => self -> Int -> IO ()
htmlInputElementStepDown self n
= ghcjs_dom_html_input_element_step_down
(unHTMLInputElement (toHTMLInputElement self))
n
foreign import javascript unsafe
"($1[\"checkValidity\"]() ? 1 : 0)"
ghcjs_dom_html_input_element_check_validity ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementCheckValidity ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementCheckValidity self
= ghcjs_dom_html_input_element_check_validity
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"setCustomValidity\"]($2)"
ghcjs_dom_html_input_element_set_custom_validity ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetCustomValidity ::
(IsHTMLInputElement self, ToJSString error) =>
self -> error -> IO ()
htmlInputElementSetCustomValidity self error
= ghcjs_dom_html_input_element_set_custom_validity
(unHTMLInputElement (toHTMLInputElement self))
(toJSString error)
foreign import javascript unsafe "$1[\"select\"]()"
ghcjs_dom_html_input_element_select ::
JSRef HTMLInputElement -> IO ()
htmlInputElementSelect ::
(IsHTMLInputElement self) => self -> IO ()
htmlInputElementSelect self
= ghcjs_dom_html_input_element_select
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"setRangeText\"]($2)"
ghcjs_dom_html_input_element_set_range_text ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetRangeText ::
(IsHTMLInputElement self, ToJSString replacement) =>
self -> replacement -> IO ()
htmlInputElementSetRangeText self replacement
= ghcjs_dom_html_input_element_set_range_text
(unHTMLInputElement (toHTMLInputElement self))
(toJSString replacement)
foreign import javascript unsafe
"$1[\"setRangeText\"]($2, $3, $4,\n$5)"
ghcjs_dom_html_input_element_set_range_text4 ::
JSRef HTMLInputElement ->
JSString -> Word -> Word -> JSString -> IO ()
htmlInputElementSetRangeText4 ::
(IsHTMLInputElement self, ToJSString replacement,
ToJSString selectionMode) =>
self -> replacement -> Word -> Word -> selectionMode -> IO ()
htmlInputElementSetRangeText4 self replacement start end
selectionMode
= ghcjs_dom_html_input_element_set_range_text4
(unHTMLInputElement (toHTMLInputElement self))
(toJSString replacement)
start
end
(toJSString selectionMode)
foreign import javascript unsafe "$1[\"setValueForUser\"]($2)"
ghcjs_dom_html_input_element_set_value_for_user ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetValueForUser ::
(IsHTMLInputElement self, ToJSString value) =>
self -> value -> IO ()
htmlInputElementSetValueForUser self value
= ghcjs_dom_html_input_element_set_value_for_user
(unHTMLInputElement (toHTMLInputElement self))
(toJSString value)
foreign import javascript unsafe "$1[\"accept\"] = $2;"
ghcjs_dom_html_input_element_set_accept ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetAccept ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetAccept self val
= ghcjs_dom_html_input_element_set_accept
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"accept\"]"
ghcjs_dom_html_input_element_get_accept ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetAccept ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetAccept self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_accept
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"alt\"] = $2;"
ghcjs_dom_html_input_element_set_alt ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetAlt ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetAlt self val
= ghcjs_dom_html_input_element_set_alt
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"alt\"]"
ghcjs_dom_html_input_element_get_alt ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetAlt ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetAlt self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_alt
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"autocomplete\"] = $2;"
ghcjs_dom_html_input_element_set_autocomplete ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetAutocomplete ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetAutocomplete self val
= ghcjs_dom_html_input_element_set_autocomplete
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"autocomplete\"]"
ghcjs_dom_html_input_element_get_autocomplete ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetAutocomplete ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetAutocomplete self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_autocomplete
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"autofocus\"] = $2;"
ghcjs_dom_html_input_element_set_autofocus ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetAutofocus ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetAutofocus self val
= ghcjs_dom_html_input_element_set_autofocus
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"autofocus\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_autofocus ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetAutofocus ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetAutofocus self
= ghcjs_dom_html_input_element_get_autofocus
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"defaultChecked\"] = $2;"
ghcjs_dom_html_input_element_set_default_checked ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetDefaultChecked ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetDefaultChecked self val
= ghcjs_dom_html_input_element_set_default_checked
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"defaultChecked\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_default_checked ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetDefaultChecked ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetDefaultChecked self
= ghcjs_dom_html_input_element_get_default_checked
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"checked\"] = $2;"
ghcjs_dom_html_input_element_set_checked ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetChecked ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetChecked self val
= ghcjs_dom_html_input_element_set_checked
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"checked\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_checked ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetChecked ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetChecked self
= ghcjs_dom_html_input_element_get_checked
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"dirName\"] = $2;"
ghcjs_dom_html_input_element_set_dir_name ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetDirName ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetDirName self val
= ghcjs_dom_html_input_element_set_dir_name
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"dirName\"]"
ghcjs_dom_html_input_element_get_dir_name ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetDirName ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetDirName self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_dir_name
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"disabled\"] = $2;"
ghcjs_dom_html_input_element_set_disabled ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetDisabled ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetDisabled self val
= ghcjs_dom_html_input_element_set_disabled
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"disabled\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_disabled ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetDisabled ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetDisabled self
= ghcjs_dom_html_input_element_get_disabled
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"form\"]"
ghcjs_dom_html_input_element_get_form ::
JSRef HTMLInputElement -> IO (JSRef HTMLFormElement)
htmlInputElementGetForm ::
(IsHTMLInputElement self) => self -> IO (Maybe HTMLFormElement)
htmlInputElementGetForm self
= fmap HTMLFormElement . maybeJSNull <$>
(ghcjs_dom_html_input_element_get_form
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"files\"] = $2;"
ghcjs_dom_html_input_element_set_files ::
JSRef HTMLInputElement -> JSRef FileList -> IO ()
htmlInputElementSetFiles ::
(IsHTMLInputElement self, IsFileList val) =>
self -> Maybe val -> IO ()
htmlInputElementSetFiles self val
= ghcjs_dom_html_input_element_set_files
(unHTMLInputElement (toHTMLInputElement self))
(maybe jsNull (unFileList . toFileList) val)
foreign import javascript unsafe "$1[\"files\"]"
ghcjs_dom_html_input_element_get_files ::
JSRef HTMLInputElement -> IO (JSRef FileList)
htmlInputElementGetFiles ::
(IsHTMLInputElement self) => self -> IO (Maybe FileList)
htmlInputElementGetFiles self
= fmap FileList . maybeJSNull <$>
(ghcjs_dom_html_input_element_get_files
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"formAction\"] = $2;"
ghcjs_dom_html_input_element_set_form_action ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetFormAction ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetFormAction self val
= ghcjs_dom_html_input_element_set_form_action
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"formAction\"]"
ghcjs_dom_html_input_element_get_form_action ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetFormAction ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetFormAction self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_form_action
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"formEnctype\"] = $2;"
ghcjs_dom_html_input_element_set_form_enctype ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetFormEnctype ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetFormEnctype self val
= ghcjs_dom_html_input_element_set_form_enctype
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"formEnctype\"]"
ghcjs_dom_html_input_element_get_form_enctype ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetFormEnctype ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetFormEnctype self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_form_enctype
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"formMethod\"] = $2;"
ghcjs_dom_html_input_element_set_form_method ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetFormMethod ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetFormMethod self val
= ghcjs_dom_html_input_element_set_form_method
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"formMethod\"]"
ghcjs_dom_html_input_element_get_form_method ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetFormMethod ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetFormMethod self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_form_method
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"formNoValidate\"] = $2;"
ghcjs_dom_html_input_element_set_form_no_validate ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetFormNoValidate ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetFormNoValidate self val
= ghcjs_dom_html_input_element_set_form_no_validate
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"formNoValidate\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_form_no_validate ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetFormNoValidate ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetFormNoValidate self
= ghcjs_dom_html_input_element_get_form_no_validate
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"formTarget\"] = $2;"
ghcjs_dom_html_input_element_set_form_target ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetFormTarget ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetFormTarget self val
= ghcjs_dom_html_input_element_set_form_target
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"formTarget\"]"
ghcjs_dom_html_input_element_get_form_target ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetFormTarget ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetFormTarget self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_form_target
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"height\"] = $2;"
ghcjs_dom_html_input_element_set_height ::
JSRef HTMLInputElement -> Word -> IO ()
htmlInputElementSetHeight ::
(IsHTMLInputElement self) => self -> Word -> IO ()
htmlInputElementSetHeight self val
= ghcjs_dom_html_input_element_set_height
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "$1[\"height\"]"
ghcjs_dom_html_input_element_get_height ::
JSRef HTMLInputElement -> IO Word
htmlInputElementGetHeight ::
(IsHTMLInputElement self) => self -> IO Word
htmlInputElementGetHeight self
= ghcjs_dom_html_input_element_get_height
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"indeterminate\"] = $2;"
ghcjs_dom_html_input_element_set_indeterminate ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetIndeterminate ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetIndeterminate self val
= ghcjs_dom_html_input_element_set_indeterminate
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"indeterminate\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_indeterminate ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetIndeterminate ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetIndeterminate self
= ghcjs_dom_html_input_element_get_indeterminate
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"list\"]"
ghcjs_dom_html_input_element_get_list ::
JSRef HTMLInputElement -> IO (JSRef HTMLElement)
htmlInputElementGetList ::
(IsHTMLInputElement self) => self -> IO (Maybe HTMLElement)
htmlInputElementGetList self
= fmap HTMLElement . maybeJSNull <$>
(ghcjs_dom_html_input_element_get_list
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"max\"] = $2;"
ghcjs_dom_html_input_element_set_max ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetMax ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetMax self val
= ghcjs_dom_html_input_element_set_max
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"max\"]"
ghcjs_dom_html_input_element_get_max ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetMax ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetMax self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_max
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"maxLength\"] = $2;"
ghcjs_dom_html_input_element_set_max_length ::
JSRef HTMLInputElement -> Int -> IO ()
htmlInputElementSetMaxLength ::
(IsHTMLInputElement self) => self -> Int -> IO ()
htmlInputElementSetMaxLength self val
= ghcjs_dom_html_input_element_set_max_length
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "$1[\"maxLength\"]"
ghcjs_dom_html_input_element_get_max_length ::
JSRef HTMLInputElement -> IO Int
htmlInputElementGetMaxLength ::
(IsHTMLInputElement self) => self -> IO Int
htmlInputElementGetMaxLength self
= ghcjs_dom_html_input_element_get_max_length
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"min\"] = $2;"
ghcjs_dom_html_input_element_set_min ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetMin ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetMin self val
= ghcjs_dom_html_input_element_set_min
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"min\"]"
ghcjs_dom_html_input_element_get_min ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetMin ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetMin self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_min
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"multiple\"] = $2;"
ghcjs_dom_html_input_element_set_multiple ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetMultiple ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetMultiple self val
= ghcjs_dom_html_input_element_set_multiple
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"multiple\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_multiple ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetMultiple ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetMultiple self
= ghcjs_dom_html_input_element_get_multiple
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"name\"] = $2;"
ghcjs_dom_html_input_element_set_name ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetName ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetName self val
= ghcjs_dom_html_input_element_set_name
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"name\"]"
ghcjs_dom_html_input_element_get_name ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetName ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetName self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_name
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"pattern\"] = $2;"
ghcjs_dom_html_input_element_set_pattern ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetPattern ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetPattern self val
= ghcjs_dom_html_input_element_set_pattern
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"pattern\"]"
ghcjs_dom_html_input_element_get_pattern ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetPattern ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetPattern self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_pattern
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"placeholder\"] = $2;"
ghcjs_dom_html_input_element_set_placeholder ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetPlaceholder ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetPlaceholder self val
= ghcjs_dom_html_input_element_set_placeholder
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"placeholder\"]"
ghcjs_dom_html_input_element_get_placeholder ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetPlaceholder ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetPlaceholder self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_placeholder
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"readOnly\"] = $2;"
ghcjs_dom_html_input_element_set_read_only ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetReadOnly ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetReadOnly self val
= ghcjs_dom_html_input_element_set_read_only
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"readOnly\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_read_only ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetReadOnly ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetReadOnly self
= ghcjs_dom_html_input_element_get_read_only
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"required\"] = $2;"
ghcjs_dom_html_input_element_set_required ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetRequired ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetRequired self val
= ghcjs_dom_html_input_element_set_required
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"required\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_required ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetRequired ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetRequired self
= ghcjs_dom_html_input_element_get_required
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"size\"] = $2;"
ghcjs_dom_html_input_element_set_size ::
JSRef HTMLInputElement -> Word -> IO ()
htmlInputElementSetSize ::
(IsHTMLInputElement self) => self -> Word -> IO ()
htmlInputElementSetSize self val
= ghcjs_dom_html_input_element_set_size
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "$1[\"size\"]"
ghcjs_dom_html_input_element_get_size ::
JSRef HTMLInputElement -> IO Word
htmlInputElementGetSize ::
(IsHTMLInputElement self) => self -> IO Word
htmlInputElementGetSize self
= ghcjs_dom_html_input_element_get_size
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"src\"] = $2;"
ghcjs_dom_html_input_element_set_src ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetSrc ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetSrc self val
= ghcjs_dom_html_input_element_set_src
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"src\"]"
ghcjs_dom_html_input_element_get_src ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetSrc ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetSrc self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_src
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"step\"] = $2;"
ghcjs_dom_html_input_element_set_step ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetStep ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetStep self val
= ghcjs_dom_html_input_element_set_step
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"step\"]"
ghcjs_dom_html_input_element_get_step ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetStep ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetStep self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_step
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"defaultValue\"] = $2;"
ghcjs_dom_html_input_element_set_default_value ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetDefaultValue ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetDefaultValue self val
= ghcjs_dom_html_input_element_set_default_value
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"defaultValue\"]"
ghcjs_dom_html_input_element_get_default_value ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetDefaultValue ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetDefaultValue self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_default_value
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"value\"] = $2;"
ghcjs_dom_html_input_element_set_value ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetValue ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetValue self val
= ghcjs_dom_html_input_element_set_value
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"value\"]"
ghcjs_dom_html_input_element_get_value ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetValue ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetValue self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_value
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"valueAsNumber\"] = $2;"
ghcjs_dom_html_input_element_set_value_as_number ::
JSRef HTMLInputElement -> Double -> IO ()
htmlInputElementSetValueAsNumber ::
(IsHTMLInputElement self) => self -> Double -> IO ()
htmlInputElementSetValueAsNumber self val
= ghcjs_dom_html_input_element_set_value_as_number
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "$1[\"valueAsNumber\"]"
ghcjs_dom_html_input_element_get_value_as_number ::
JSRef HTMLInputElement -> IO Double
htmlInputElementGetValueAsNumber ::
(IsHTMLInputElement self) => self -> IO Double
htmlInputElementGetValueAsNumber self
= ghcjs_dom_html_input_element_get_value_as_number
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"width\"] = $2;"
ghcjs_dom_html_input_element_set_width ::
JSRef HTMLInputElement -> Word -> IO ()
htmlInputElementSetWidth ::
(IsHTMLInputElement self) => self -> Word -> IO ()
htmlInputElementSetWidth self val
= ghcjs_dom_html_input_element_set_width
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "$1[\"width\"]"
ghcjs_dom_html_input_element_get_width ::
JSRef HTMLInputElement -> IO Word
htmlInputElementGetWidth ::
(IsHTMLInputElement self) => self -> IO Word
htmlInputElementGetWidth self
= ghcjs_dom_html_input_element_get_width
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "($1[\"willValidate\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_will_validate ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetWillValidate ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetWillValidate self
= ghcjs_dom_html_input_element_get_will_validate
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"validity\"]"
ghcjs_dom_html_input_element_get_validity ::
JSRef HTMLInputElement -> IO (JSRef ValidityState)
htmlInputElementGetValidity ::
(IsHTMLInputElement self) => self -> IO (Maybe ValidityState)
htmlInputElementGetValidity self
= fmap ValidityState . maybeJSNull <$>
(ghcjs_dom_html_input_element_get_validity
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"validationMessage\"]"
ghcjs_dom_html_input_element_get_validation_message ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetValidationMessage ::
(IsHTMLInputElement self, FromJSString result) =>
self -> IO result
htmlInputElementGetValidationMessage self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_validation_message
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"labels\"]"
ghcjs_dom_html_input_element_get_labels ::
JSRef HTMLInputElement -> IO (JSRef NodeList)
htmlInputElementGetLabels ::
(IsHTMLInputElement self) => self -> IO (Maybe NodeList)
htmlInputElementGetLabels self
= fmap NodeList . maybeJSNull <$>
(ghcjs_dom_html_input_element_get_labels
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"align\"] = $2;"
ghcjs_dom_html_input_element_set_align ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetAlign ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetAlign self val
= ghcjs_dom_html_input_element_set_align
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"align\"]"
ghcjs_dom_html_input_element_get_align ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetAlign ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetAlign self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_align
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"useMap\"] = $2;"
ghcjs_dom_html_input_element_set_use_map ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetUseMap ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetUseMap self val
= ghcjs_dom_html_input_element_set_use_map
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"useMap\"]"
ghcjs_dom_html_input_element_get_use_map ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetUseMap ::
(IsHTMLInputElement self, FromJSString result) => self -> IO result
htmlInputElementGetUseMap self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_use_map
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"incremental\"] = $2;"
ghcjs_dom_html_input_element_set_incremental ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetIncremental ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetIncremental self val
= ghcjs_dom_html_input_element_set_incremental
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"incremental\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_incremental ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetIncremental ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetIncremental self
= ghcjs_dom_html_input_element_get_incremental
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"autocorrect\"] = $2;"
ghcjs_dom_html_input_element_set_autocorrect ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetAutocorrect ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetAutocorrect self val
= ghcjs_dom_html_input_element_set_autocorrect
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"autocorrect\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_autocorrect ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetAutocorrect ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetAutocorrect self
= ghcjs_dom_html_input_element_get_autocorrect
(unHTMLInputElement (toHTMLInputElement self))
foreign import javascript unsafe "$1[\"autocapitalize\"] = $2;"
ghcjs_dom_html_input_element_set_autocapitalize ::
JSRef HTMLInputElement -> JSString -> IO ()
htmlInputElementSetAutocapitalize ::
(IsHTMLInputElement self, ToJSString val) => self -> val -> IO ()
htmlInputElementSetAutocapitalize self val
= ghcjs_dom_html_input_element_set_autocapitalize
(unHTMLInputElement (toHTMLInputElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"autocapitalize\"]"
ghcjs_dom_html_input_element_get_autocapitalize ::
JSRef HTMLInputElement -> IO JSString
htmlInputElementGetAutocapitalize ::
(IsHTMLInputElement self, FromJSString result) =>
self -> IO result
htmlInputElementGetAutocapitalize self
= fromJSString <$>
(ghcjs_dom_html_input_element_get_autocapitalize
(unHTMLInputElement (toHTMLInputElement self)))
foreign import javascript unsafe "$1[\"capture\"] = $2;"
ghcjs_dom_html_input_element_set_capture ::
JSRef HTMLInputElement -> Bool -> IO ()
htmlInputElementSetCapture ::
(IsHTMLInputElement self) => self -> Bool -> IO ()
htmlInputElementSetCapture self val
= ghcjs_dom_html_input_element_set_capture
(unHTMLInputElement (toHTMLInputElement self))
val
foreign import javascript unsafe "($1[\"capture\"] ? 1 : 0)"
ghcjs_dom_html_input_element_get_capture ::
JSRef HTMLInputElement -> IO Bool
htmlInputElementGetCapture ::
(IsHTMLInputElement self) => self -> IO Bool
htmlInputElementGetCapture self
= ghcjs_dom_html_input_element_get_capture
(unHTMLInputElement (toHTMLInputElement self))
#else
module GHCJS.DOM.HTMLInputElement (
module Graphics.UI.Gtk.WebKit.DOM.HTMLInputElement
) where
import Graphics.UI.Gtk.WebKit.DOM.HTMLInputElement
#endif