{-# LANGUAGE CPP #-}
#if (defined(ghcjs_HOST_OS) && defined(USE_JAVASCRIPTFFI)) || !defined(USE_WEBKIT)
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
module GHCJS.DOM.HTMLFontElement
       (ghcjs_dom_html_font_element_set_color, htmlFontElementSetColor,
        ghcjs_dom_html_font_element_get_color, htmlFontElementGetColor,
        ghcjs_dom_html_font_element_set_face, htmlFontElementSetFace,
        ghcjs_dom_html_font_element_get_face, htmlFontElementGetFace,
        ghcjs_dom_html_font_element_set_size, htmlFontElementSetSize,
        ghcjs_dom_html_font_element_get_size, htmlFontElementGetSize,
        HTMLFontElement, IsHTMLFontElement, castToHTMLFontElement,
        gTypeHTMLFontElement, toHTMLFontElement)
       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[\"color\"] = $2;"
        ghcjs_dom_html_font_element_set_color ::
        JSRef HTMLFontElement -> JSString -> IO ()
 
htmlFontElementSetColor ::
                        (IsHTMLFontElement self, ToJSString val) => self -> val -> IO ()
htmlFontElementSetColor self val
  = ghcjs_dom_html_font_element_set_color
      (unHTMLFontElement (toHTMLFontElement self))
      (toJSString val)
 
foreign import javascript unsafe "$1[\"color\"]"
        ghcjs_dom_html_font_element_get_color ::
        JSRef HTMLFontElement -> IO JSString
 
htmlFontElementGetColor ::
                        (IsHTMLFontElement self, FromJSString result) => self -> IO result
htmlFontElementGetColor self
  = fromJSString <$>
      (ghcjs_dom_html_font_element_get_color
         (unHTMLFontElement (toHTMLFontElement self)))
 
foreign import javascript unsafe "$1[\"face\"] = $2;"
        ghcjs_dom_html_font_element_set_face ::
        JSRef HTMLFontElement -> JSString -> IO ()
 
htmlFontElementSetFace ::
                       (IsHTMLFontElement self, ToJSString val) => self -> val -> IO ()
htmlFontElementSetFace self val
  = ghcjs_dom_html_font_element_set_face
      (unHTMLFontElement (toHTMLFontElement self))
      (toJSString val)
 
foreign import javascript unsafe "$1[\"face\"]"
        ghcjs_dom_html_font_element_get_face ::
        JSRef HTMLFontElement -> IO JSString
 
htmlFontElementGetFace ::
                       (IsHTMLFontElement self, FromJSString result) => self -> IO result
htmlFontElementGetFace self
  = fromJSString <$>
      (ghcjs_dom_html_font_element_get_face
         (unHTMLFontElement (toHTMLFontElement self)))
 
foreign import javascript unsafe "$1[\"size\"] = $2;"
        ghcjs_dom_html_font_element_set_size ::
        JSRef HTMLFontElement -> JSString -> IO ()
 
htmlFontElementSetSize ::
                       (IsHTMLFontElement self, ToJSString val) => self -> val -> IO ()
htmlFontElementSetSize self val
  = ghcjs_dom_html_font_element_set_size
      (unHTMLFontElement (toHTMLFontElement self))
      (toJSString val)
 
foreign import javascript unsafe "$1[\"size\"]"
        ghcjs_dom_html_font_element_get_size ::
        JSRef HTMLFontElement -> IO JSString
 
htmlFontElementGetSize ::
                       (IsHTMLFontElement self, FromJSString result) => self -> IO result
htmlFontElementGetSize self
  = fromJSString <$>
      (ghcjs_dom_html_font_element_get_size
         (unHTMLFontElement (toHTMLFontElement self)))
#else
module GHCJS.DOM.HTMLFontElement (
  module Graphics.UI.Gtk.WebKit.DOM.HTMLFontElement
  ) where
import Graphics.UI.Gtk.WebKit.DOM.HTMLFontElement
#endif