module JSDOM.Generated.HTMLTableElement
(createTHead, createTHead_, createTHeadUnchecked, deleteTHead,
createTFoot, createTFoot_, createTFootUnchecked, deleteTFoot,
createTBody, createTBody_, createTBodyUnchecked, createCaption,
createCaption_, createCaptionUnchecked, deleteCaption, insertRow,
insertRow_, insertRowUnchecked, deleteRow, setCaption, getCaption,
getCaptionUnchecked, setTHead, getTHead, getTHeadUnchecked,
setTFoot, getTFoot, getTFootUnchecked, getRows, getRowsUnchecked,
getTBodies, getTBodiesUnchecked, setAlign, getAlign, setBgColor,
getBgColor, setBorder, getBorder, setCellPadding, getCellPadding,
setCellSpacing, getCellSpacing, setFrame, getFrame, setRules,
getRules, setSummary, getSummary, setWidth, getWidth,
HTMLTableElement, castToHTMLTableElement, gTypeHTMLTableElement)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import Data.Typeable (Typeable)
import Language.Javascript.JSaddle (JSM(..), JSVal(..), JSString, strictEqual, toJSVal, valToStr, valToNumber, valToBool, js, jss, jsf, jsg, function, new, array)
import Data.Int (Int64)
import Data.Word (Word, Word64)
import JSDOM.Types
import Control.Applicative ((<$>))
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import JSDOM.EventTargetClosures (EventName, unsafeEventName)
import JSDOM.Enums
createTHead ::
(MonadDOM m) => HTMLTableElement -> m (Maybe HTMLElement)
createTHead self
= liftDOM ((self ^. jsf "createTHead" ()) >>= fromJSVal)
createTHead_ :: (MonadDOM m) => HTMLTableElement -> m ()
createTHead_ self = liftDOM (void (self ^. jsf "createTHead" ()))
createTHeadUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLElement
createTHeadUnchecked self
= liftDOM ((self ^. jsf "createTHead" ()) >>= fromJSValUnchecked)
deleteTHead :: (MonadDOM m) => HTMLTableElement -> m ()
deleteTHead self = liftDOM (void (self ^. jsf "deleteTHead" ()))
createTFoot ::
(MonadDOM m) => HTMLTableElement -> m (Maybe HTMLElement)
createTFoot self
= liftDOM ((self ^. jsf "createTFoot" ()) >>= fromJSVal)
createTFoot_ :: (MonadDOM m) => HTMLTableElement -> m ()
createTFoot_ self = liftDOM (void (self ^. jsf "createTFoot" ()))
createTFootUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLElement
createTFootUnchecked self
= liftDOM ((self ^. jsf "createTFoot" ()) >>= fromJSValUnchecked)
deleteTFoot :: (MonadDOM m) => HTMLTableElement -> m ()
deleteTFoot self = liftDOM (void (self ^. jsf "deleteTFoot" ()))
createTBody ::
(MonadDOM m) => HTMLTableElement -> m (Maybe HTMLElement)
createTBody self
= liftDOM ((self ^. jsf "createTBody" ()) >>= fromJSVal)
createTBody_ :: (MonadDOM m) => HTMLTableElement -> m ()
createTBody_ self = liftDOM (void (self ^. jsf "createTBody" ()))
createTBodyUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLElement
createTBodyUnchecked self
= liftDOM ((self ^. jsf "createTBody" ()) >>= fromJSValUnchecked)
createCaption ::
(MonadDOM m) => HTMLTableElement -> m (Maybe HTMLElement)
createCaption self
= liftDOM ((self ^. jsf "createCaption" ()) >>= fromJSVal)
createCaption_ :: (MonadDOM m) => HTMLTableElement -> m ()
createCaption_ self
= liftDOM (void (self ^. jsf "createCaption" ()))
createCaptionUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLElement
createCaptionUnchecked self
= liftDOM ((self ^. jsf "createCaption" ()) >>= fromJSValUnchecked)
deleteCaption :: (MonadDOM m) => HTMLTableElement -> m ()
deleteCaption self
= liftDOM (void (self ^. jsf "deleteCaption" ()))
insertRow ::
(MonadDOM m) => HTMLTableElement -> Int -> m (Maybe HTMLElement)
insertRow self index
= liftDOM ((self ^. jsf "insertRow" [toJSVal index]) >>= fromJSVal)
insertRow_ :: (MonadDOM m) => HTMLTableElement -> Int -> m ()
insertRow_ self index
= liftDOM (void (self ^. jsf "insertRow" [toJSVal index]))
insertRowUnchecked ::
(MonadDOM m) => HTMLTableElement -> Int -> m HTMLElement
insertRowUnchecked self index
= liftDOM
((self ^. jsf "insertRow" [toJSVal index]) >>= fromJSValUnchecked)
deleteRow :: (MonadDOM m) => HTMLTableElement -> Int -> m ()
deleteRow self index
= liftDOM (void (self ^. jsf "deleteRow" [toJSVal index]))
setCaption ::
(MonadDOM m) =>
HTMLTableElement -> Maybe HTMLTableCaptionElement -> m ()
setCaption self val = liftDOM (self ^. jss "caption" (toJSVal val))
getCaption ::
(MonadDOM m) =>
HTMLTableElement -> m (Maybe HTMLTableCaptionElement)
getCaption self = liftDOM ((self ^. js "caption") >>= fromJSVal)
getCaptionUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLTableCaptionElement
getCaptionUnchecked self
= liftDOM ((self ^. js "caption") >>= fromJSValUnchecked)
setTHead ::
(MonadDOM m) =>
HTMLTableElement -> Maybe HTMLTableSectionElement -> m ()
setTHead self val = liftDOM (self ^. jss "tHead" (toJSVal val))
getTHead ::
(MonadDOM m) =>
HTMLTableElement -> m (Maybe HTMLTableSectionElement)
getTHead self = liftDOM ((self ^. js "tHead") >>= fromJSVal)
getTHeadUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLTableSectionElement
getTHeadUnchecked self
= liftDOM ((self ^. js "tHead") >>= fromJSValUnchecked)
setTFoot ::
(MonadDOM m) =>
HTMLTableElement -> Maybe HTMLTableSectionElement -> m ()
setTFoot self val = liftDOM (self ^. jss "tFoot" (toJSVal val))
getTFoot ::
(MonadDOM m) =>
HTMLTableElement -> m (Maybe HTMLTableSectionElement)
getTFoot self = liftDOM ((self ^. js "tFoot") >>= fromJSVal)
getTFootUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLTableSectionElement
getTFootUnchecked self
= liftDOM ((self ^. js "tFoot") >>= fromJSValUnchecked)
getRows ::
(MonadDOM m) => HTMLTableElement -> m (Maybe HTMLCollection)
getRows self = liftDOM ((self ^. js "rows") >>= fromJSVal)
getRowsUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLCollection
getRowsUnchecked self
= liftDOM ((self ^. js "rows") >>= fromJSValUnchecked)
getTBodies ::
(MonadDOM m) => HTMLTableElement -> m (Maybe HTMLCollection)
getTBodies self = liftDOM ((self ^. js "tBodies") >>= fromJSVal)
getTBodiesUnchecked ::
(MonadDOM m) => HTMLTableElement -> m HTMLCollection
getTBodiesUnchecked self
= liftDOM ((self ^. js "tBodies") >>= fromJSValUnchecked)
setAlign ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setAlign self val = liftDOM (self ^. jss "align" (toJSVal val))
getAlign ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getAlign self
= liftDOM ((self ^. js "align") >>= fromJSValUnchecked)
setBgColor ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setBgColor self val = liftDOM (self ^. jss "bgColor" (toJSVal val))
getBgColor ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getBgColor self
= liftDOM ((self ^. js "bgColor") >>= fromJSValUnchecked)
setBorder ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setBorder self val = liftDOM (self ^. jss "border" (toJSVal val))
getBorder ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getBorder self
= liftDOM ((self ^. js "border") >>= fromJSValUnchecked)
setCellPadding ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setCellPadding self val
= liftDOM (self ^. jss "cellPadding" (toJSVal val))
getCellPadding ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getCellPadding self
= liftDOM ((self ^. js "cellPadding") >>= fromJSValUnchecked)
setCellSpacing ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setCellSpacing self val
= liftDOM (self ^. jss "cellSpacing" (toJSVal val))
getCellSpacing ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getCellSpacing self
= liftDOM ((self ^. js "cellSpacing") >>= fromJSValUnchecked)
setFrame ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setFrame self val = liftDOM (self ^. jss "frame" (toJSVal val))
getFrame ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getFrame self
= liftDOM ((self ^. js "frame") >>= fromJSValUnchecked)
setRules ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setRules self val = liftDOM (self ^. jss "rules" (toJSVal val))
getRules ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getRules self
= liftDOM ((self ^. js "rules") >>= fromJSValUnchecked)
setSummary ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setSummary self val = liftDOM (self ^. jss "summary" (toJSVal val))
getSummary ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getSummary self
= liftDOM ((self ^. js "summary") >>= fromJSValUnchecked)
setWidth ::
(MonadDOM m, ToJSString val) => HTMLTableElement -> val -> m ()
setWidth self val = liftDOM (self ^. jss "width" (toJSVal val))
getWidth ::
(MonadDOM m, FromJSString result) => HTMLTableElement -> m result
getWidth self
= liftDOM ((self ^. js "width") >>= fromJSValUnchecked)