module Data.DOM.CSSCharsetRule
       (set'encoding, get'encoding, getm'encoding) where
import Data.DOM.Css
import Control.Monad
import BrownPLT.JavaScript
import Data.DOM.WBTypes
import Data.DOM.Views
import Data.DOM.Stylesheets
import Data.DOM.Dom
import Data.DOM.Document (createElement)
 
set'encoding ::
             (Monad mn, CCSSCharsetRule zz) =>
               Expression String -> Expression zz -> mn (Expression zz)
set'encoding = setjsProperty "encoding"
 
get'encoding ::
             (Monad mn, CCSSCharsetRule this) =>
               Expression this -> mn (Expression String)
get'encoding thisp
  = do let et = undefined :: String
       let r = DotRef et (thisp /\ et) (Id et "encoding")
       return r
 
getm'encoding ::
              (Monad mn, CCSSCharsetRule this) =>
                Expression this -> mn (Expression String)
getm'encoding = get'encoding