module Graphics.UI.Gtk.WebKit.DOM.HTMLTableCellElement
(htmlTableCellElementGetCellIndex, htmlTableCellElementSetAbbr,
htmlTableCellElementGetAbbr, htmlTableCellElementSetAlign,
htmlTableCellElementGetAlign, htmlTableCellElementSetAxis,
htmlTableCellElementGetAxis, htmlTableCellElementSetBgColor,
htmlTableCellElementGetBgColor, htmlTableCellElementSetCh,
htmlTableCellElementGetCh, htmlTableCellElementSetChOff,
htmlTableCellElementGetChOff, htmlTableCellElementSetColSpan,
htmlTableCellElementGetColSpan, htmlTableCellElementSetHeaders,
htmlTableCellElementGetHeaders, htmlTableCellElementSetHeight,
htmlTableCellElementGetHeight, htmlTableCellElementSetNoWrap,
htmlTableCellElementGetNoWrap, htmlTableCellElementSetRowSpan,
htmlTableCellElementGetRowSpan, htmlTableCellElementSetScope,
htmlTableCellElementGetScope, htmlTableCellElementSetVAlign,
htmlTableCellElementGetVAlign, htmlTableCellElementSetWidth,
htmlTableCellElementGetWidth, HTMLTableCellElement,
HTMLTableCellElementClass, castToHTMLTableCellElement,
gTypeHTMLTableCellElement, toHTMLTableCellElement)
where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
{#import Graphics.UI.Gtk.WebKit.Types#}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
htmlTableCellElementGetCellIndex ::
(HTMLTableCellElementClass self) => self -> IO Int
htmlTableCellElementGetCellIndex self
= fromIntegral <$>
({# call webkit_dom_html_table_cell_element_get_cell_index #}
(toHTMLTableCellElement self))
htmlTableCellElementSetAbbr ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetAbbr self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_abbr #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetAbbr ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetAbbr self
= ({# call webkit_dom_html_table_cell_element_get_abbr #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetAlign ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetAlign self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_align #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetAlign ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetAlign self
= ({# call webkit_dom_html_table_cell_element_get_align #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetAxis ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetAxis self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_axis #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetAxis ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetAxis self
= ({# call webkit_dom_html_table_cell_element_get_axis #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetBgColor ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetBgColor self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_bg_color #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetBgColor ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetBgColor self
= ({# call webkit_dom_html_table_cell_element_get_bg_color #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetCh ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetCh self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_ch #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetCh ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetCh self
= ({# call webkit_dom_html_table_cell_element_get_ch #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetChOff ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetChOff self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_ch_off #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetChOff ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetChOff self
= ({# call webkit_dom_html_table_cell_element_get_ch_off #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetColSpan ::
(HTMLTableCellElementClass self) => self -> Int -> IO ()
htmlTableCellElementSetColSpan self val
= {# call webkit_dom_html_table_cell_element_set_col_span #}
(toHTMLTableCellElement self)
(fromIntegral val)
htmlTableCellElementGetColSpan ::
(HTMLTableCellElementClass self) => self -> IO Int
htmlTableCellElementGetColSpan self
= fromIntegral <$>
({# call webkit_dom_html_table_cell_element_get_col_span #}
(toHTMLTableCellElement self))
htmlTableCellElementSetHeaders ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetHeaders self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_headers #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetHeaders ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetHeaders self
= ({# call webkit_dom_html_table_cell_element_get_headers #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetHeight ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetHeight self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_height #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetHeight ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetHeight self
= ({# call webkit_dom_html_table_cell_element_get_height #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetNoWrap ::
(HTMLTableCellElementClass self) => self -> Bool -> IO ()
htmlTableCellElementSetNoWrap self val
= {# call webkit_dom_html_table_cell_element_set_no_wrap #}
(toHTMLTableCellElement self)
(fromBool val)
htmlTableCellElementGetNoWrap ::
(HTMLTableCellElementClass self) => self -> IO Bool
htmlTableCellElementGetNoWrap self
= toBool <$>
({# call webkit_dom_html_table_cell_element_get_no_wrap #}
(toHTMLTableCellElement self))
htmlTableCellElementSetRowSpan ::
(HTMLTableCellElementClass self) => self -> Int -> IO ()
htmlTableCellElementSetRowSpan self val
= {# call webkit_dom_html_table_cell_element_set_row_span #}
(toHTMLTableCellElement self)
(fromIntegral val)
htmlTableCellElementGetRowSpan ::
(HTMLTableCellElementClass self) => self -> IO Int
htmlTableCellElementGetRowSpan self
= fromIntegral <$>
({# call webkit_dom_html_table_cell_element_get_row_span #}
(toHTMLTableCellElement self))
htmlTableCellElementSetScope ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetScope self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_scope #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetScope ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetScope self
= ({# call webkit_dom_html_table_cell_element_get_scope #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetVAlign ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetVAlign self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_v_align #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetVAlign ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetVAlign self
= ({# call webkit_dom_html_table_cell_element_get_v_align #}
(toHTMLTableCellElement self))
>>=
readUTFString
htmlTableCellElementSetWidth ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> string -> IO ()
htmlTableCellElementSetWidth self val
= withUTFString val $
\ valPtr ->
{# call webkit_dom_html_table_cell_element_set_width #}
(toHTMLTableCellElement self)
valPtr
htmlTableCellElementGetWidth ::
(HTMLTableCellElementClass self, GlibString string) =>
self -> IO string
htmlTableCellElementGetWidth self
= ({# call webkit_dom_html_table_cell_element_get_width #}
(toHTMLTableCellElement self))
>>=
readUTFString