#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
module GHCJS.DOM.HTMLMapElement
(ghcjs_dom_html_map_element_get_areas, htmlMapElementGetAreas,
ghcjs_dom_html_map_element_set_name, htmlMapElementSetName,
ghcjs_dom_html_map_element_get_name, htmlMapElementGetName,
HTMLMapElement, IsHTMLMapElement, castToHTMLMapElement,
gTypeHTMLMapElement, toHTMLMapElement)
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[\"areas\"]"
ghcjs_dom_html_map_element_get_areas ::
JSRef HTMLMapElement -> IO (JSRef HTMLCollection)
htmlMapElementGetAreas ::
(IsHTMLMapElement self) => self -> IO (Maybe HTMLCollection)
htmlMapElementGetAreas self
= fmap HTMLCollection . maybeJSNull <$>
(ghcjs_dom_html_map_element_get_areas
(unHTMLMapElement (toHTMLMapElement self)))
foreign import javascript unsafe "$1[\"name\"] = $2;"
ghcjs_dom_html_map_element_set_name ::
JSRef HTMLMapElement -> JSString -> IO ()
htmlMapElementSetName ::
(IsHTMLMapElement self, ToJSString val) => self -> val -> IO ()
htmlMapElementSetName self val
= ghcjs_dom_html_map_element_set_name
(unHTMLMapElement (toHTMLMapElement self))
(toJSString val)
foreign import javascript unsafe "$1[\"name\"]"
ghcjs_dom_html_map_element_get_name ::
JSRef HTMLMapElement -> IO JSString
htmlMapElementGetName ::
(IsHTMLMapElement self, FromJSString result) => self -> IO result
htmlMapElementGetName self
= fromJSString <$>
(ghcjs_dom_html_map_element_get_name
(unHTMLMapElement (toHTMLMapElement self)))
#else
module GHCJS.DOM.HTMLMapElement (
module Graphics.UI.Gtk.WebKit.DOM.HTMLMapElement
) where
import Graphics.UI.Gtk.WebKit.DOM.HTMLMapElement
#endif