be94e12 · reflex-dom · git.iko.soy

git.iko.soy/reflex-dom

A little bit of cleanup

be94e12Ryan Trinkle10 years ago

src/Reflex/Dom/Builder/Static.hs+2−1

@@ -91,8 +91,9 @@ instance (Monad m, Ref m ~ Ref IO, Reflex t) => TriggerEvent t (StaticDomBuilder

91type SupportsStaticDomBuilder t m = (Reflex t, MonadIO m, MonadHold t m, MonadFix m, PerformEvent t m, Performable m ~ m, MonadReflexCreateTrigger t m, Deletable t m, MonadRef m, Ref m ~ Ref IO)

93data StaticDomSpace

94+

94instance DomSpace StaticDomSpace where

95instance DomSpace StaticDomSpace where

95− type RawElement StaticDomSpace = ByteString

96+ type RawElement StaticDomSpace = ByteString

97instance SupportsStaticDomBuilder t m => DomBuilder t (StaticDomBuilderT t m) where

98instance SupportsStaticDomBuilder t m => DomBuilder t (StaticDomBuilderT t m) where

98 type DomBuilderSpace (StaticDomBuilderT t m) = StaticDomSpace

99 type DomBuilderSpace (StaticDomBuilderT t m) = StaticDomSpace

src/Reflex/Dom/Xhr.hs+7−8

@@ -1,13 +1,13 @@

1{-# LANGUAGE TemplateHaskell, GADTs, DeriveDataTypeable, DeriveFunctor, FlexibleContexts, OverloadedStrings #-}

2module Reflex.Dom.Xhr

3 ( XMLHttpRequest

4− , XhrRequest(..)

4+ , XhrRequest (..)

5− , XhrRequestConfig(..)

5+ , XhrRequestConfig (..)

6− , XhrResponse(..)

6+ , XhrResponse (..)

7− , XhrResponseBody(..)

7+ , XhrResponseBody (..)

8− , XhrResponseType(..)

8+ , XhrResponseType (..)

9− , XhrException(..)

9+ , XhrException (..)

10− , IsXhrPayload(..)

10+ , IsXhrPayload (..)

11 , _xhrResponse_body

12 , decodeText

13 , decodeXhrResponse

@@ -43,7 +43,6 @@ module Reflex.Dom.Xhr

43 , xmlHttpRequestNew

44 , xmlHttpRequestOnreadystatechange

45 , xmlHttpRequestOpen

46− , xmlHttpRequestSend

47 , xmlHttpRequestSetRequestHeader

46 , xmlHttpRequestSetRequestHeader

48 , xmlHttpRequestSetResponseType

47 , xmlHttpRequestSetResponseType

49 )

48 )