module JSDOM.Generated.DocumentFragment
(newDocumentFragment, querySelector, querySelector_,
querySelectorUnsafe, querySelectorUnchecked, querySelectorAll,
querySelectorAll_, querySelectorAllUnsafe,
querySelectorAllUnchecked, DocumentFragment(..),
gTypeDocumentFragment)
where
import Prelude ((.), (==), (>>=), return, IO, Int, Float, Double, Bool(..), Maybe, maybe, fromIntegral, round, realToFrac, fmap, Show, Read, Eq, Ord, Maybe(..))
import qualified Prelude (error)
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
newDocumentFragment :: (MonadDOM m) => m DocumentFragment
newDocumentFragment
= liftDOM (DocumentFragment <$> new (jsg "DocumentFragment") ())
querySelector ::
(MonadDOM m, ToJSString selectors) =>
DocumentFragment -> selectors -> m (Maybe Element)
querySelector self selectors
= liftDOM
((self ^. jsf "querySelector" [toJSVal selectors]) >>= fromJSVal)
querySelector_ ::
(MonadDOM m, ToJSString selectors) =>
DocumentFragment -> selectors -> m ()
querySelector_ self selectors
= liftDOM (void (self ^. jsf "querySelector" [toJSVal selectors]))
querySelectorUnsafe ::
(MonadDOM m, ToJSString selectors, HasCallStack) =>
DocumentFragment -> selectors -> m Element
querySelectorUnsafe self selectors
= liftDOM
(((self ^. jsf "querySelector" [toJSVal selectors]) >>= fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
querySelectorUnchecked ::
(MonadDOM m, ToJSString selectors) =>
DocumentFragment -> selectors -> m Element
querySelectorUnchecked self selectors
= liftDOM
((self ^. jsf "querySelector" [toJSVal selectors]) >>=
fromJSValUnchecked)
querySelectorAll ::
(MonadDOM m, ToJSString selectors) =>
DocumentFragment -> selectors -> m (Maybe NodeList)
querySelectorAll self selectors
= liftDOM
((self ^. jsf "querySelectorAll" [toJSVal selectors]) >>=
fromJSVal)
querySelectorAll_ ::
(MonadDOM m, ToJSString selectors) =>
DocumentFragment -> selectors -> m ()
querySelectorAll_ self selectors
= liftDOM
(void (self ^. jsf "querySelectorAll" [toJSVal selectors]))
querySelectorAllUnsafe ::
(MonadDOM m, ToJSString selectors, HasCallStack) =>
DocumentFragment -> selectors -> m NodeList
querySelectorAllUnsafe self selectors
= liftDOM
(((self ^. jsf "querySelectorAll" [toJSVal selectors]) >>=
fromJSVal)
>>= maybe (Prelude.error "Nothing to return") return)
querySelectorAllUnchecked ::
(MonadDOM m, ToJSString selectors) =>
DocumentFragment -> selectors -> m NodeList
querySelectorAllUnchecked self selectors
= liftDOM
((self ^. jsf "querySelectorAll" [toJSVal selectors]) >>=
fromJSValUnchecked)