module Data.DOM.HTMLModElement
(set'cite, get'cite, getm'cite, set'dateTime, get'dateTime,
getm'dateTime)
where
import Data.DOM.Html2
import Control.Monad
import BrownPLT.JavaScript
import Data.DOM.WBTypes
import Data.DOM.Dom
import Data.DOM.Document (createElement)
set'cite ::
(Monad mn, CHTMLModElement zz) =>
Expression String -> Expression zz -> mn (Expression zz)
set'cite = setjsProperty "cite"
get'cite ::
(Monad mn, CHTMLModElement this) =>
Expression this -> mn (Expression String)
get'cite thisp
= do let et = undefined :: String
let r = DotRef et (thisp /\ et) (Id et "cite")
return r
getm'cite ::
(Monad mn, CHTMLModElement this) =>
Expression this -> mn (Expression String)
getm'cite = get'cite
set'dateTime ::
(Monad mn, CHTMLModElement zz) =>
Expression String -> Expression zz -> mn (Expression zz)
set'dateTime = setjsProperty "dateTime"
get'dateTime ::
(Monad mn, CHTMLModElement this) =>
Expression this -> mn (Expression String)
get'dateTime thisp
= do let et = undefined :: String
let r = DotRef et (thisp /\ et) (Id et "dateTime")
return r
getm'dateTime ::
(Monad mn, CHTMLModElement this) =>
Expression this -> mn (Expression String)
getm'dateTime = get'dateTime