9abf5f2 · reflex-dom · git.iko.soy

src-ghc/Reflex/Dom/WebSocket/Foreign.hs+1−1

compare with develop

unifiedsplit

@@ -1,4 +1,3 @@

1−{-# LANGUAGE TemplateHaskell #-}

2{-# LANGUAGE AllowAmbiguousTypes #-}

1{-# LANGUAGE AllowAmbiguousTypes #-}

3{-# LANGUAGE ConstraintKinds #-}

2{-# LANGUAGE ConstraintKinds #-}

4{-# LANGUAGE FlexibleContexts #-}

3{-# LANGUAGE FlexibleContexts #-}

@@ -10,6 +9,7 @@

10{-# LANGUAGE PolyKinds #-}

9{-# LANGUAGE PolyKinds #-}

11{-# LANGUAGE RankNTypes #-}

10{-# LANGUAGE RankNTypes #-}

12{-# LANGUAGE ScopedTypeVariables #-}

11{-# LANGUAGE ScopedTypeVariables #-}

12+{-# LANGUAGE TemplateHaskell #-}

13{-# LANGUAGE TypeFamilies #-}

14{-# LANGUAGE UndecidableInstances #-}

15

src-ghcjs/Reflex/Dom/WebSocket/Foreign.hs+1−1

@@ -16,10 +16,10 @@ import Data.Text (Text)

16import qualified Data.Text as T (unpack)

17import Data.Text.Encoding

18import GHCJS.Buffer

19+import GHCJS.DOM.CloseEvent

19import GHCJS.DOM.EventM (on)

20import GHCJS.DOM.EventM (on)

20import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)

21import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)

21import GHCJS.DOM.MessageEvent

22import GHCJS.DOM.MessageEvent

22−import GHCJS.DOM.CloseEvent

23import GHCJS.DOM.Types hiding (Text)

24import qualified GHCJS.DOM.WebSocket as GD

25import GHCJS.Foreign.Internal

src-ghcjs/Reflex/Dom/Xhr/Foreign.hs+1−1

@@ -51,7 +51,7 @@ instance IsXhrPayload String where

51

52instance IsXhrPayload Text where

53 sendXhrPayload = sendString

54−

54+

55instance IsXhrPayload FormData where

56 sendXhrPayload = sendFormData

57

src/Foreign/JavaScript/TH.hs+1−1

@@ -22,10 +22,10 @@ module Foreign.JavaScript.TH ( module Foreign.JavaScript.TH

22

23import Reflex.Class

24import Reflex.DynamicWriter

25+import Reflex.Host.Class

25import Reflex.PerformEvent.Base

26import Reflex.PerformEvent.Base

26import Reflex.PerformEvent.Class

27import Reflex.PerformEvent.Class

27import Reflex.PostBuild.Class

28import Reflex.PostBuild.Class

28−import Reflex.Host.Class

29

30import Language.Haskell.TH

31

src/Reflex/Dom/Builder/Class.hs+1−1

@@ -23,8 +23,8 @@ module Reflex.Dom.Builder.Class

23import Reflex.Class as Reflex

24import Reflex.Dom.Builder.Class.Events

25import Reflex.DynamicWriter

26−import Reflex.PerformEvent.Class

27import Reflex.PerformEvent.Base

26import Reflex.PerformEvent.Base

27+import Reflex.PerformEvent.Class

28import Reflex.PostBuild.Class

29

30import qualified Control.Category

src/Reflex/Dom/Builder/Immediate.hs+4−4

@@ -19,11 +19,11 @@ module Reflex.Dom.Builder.Immediate where

19

20import Foreign.JavaScript.TH

21import Reflex.Class as Reflex

22−import Reflex.Dynamic

23import Reflex.Dom.Builder.Class

22import Reflex.Dom.Builder.Class

23+import Reflex.Dynamic

24+import Reflex.Host.Class

24import Reflex.PerformEvent.Class

25import Reflex.PerformEvent.Class

25import Reflex.PostBuild.Class

26import Reflex.PostBuild.Class

26−import Reflex.Host.Class

27

28import Control.Concurrent.Chan

29import Control.Lens hiding (element)

@@ -57,8 +57,8 @@ import qualified GHCJS.DOM.HTMLInputElement as Input

57import qualified GHCJS.DOM.HTMLSelectElement as Select

58import qualified GHCJS.DOM.HTMLTextAreaElement as TextArea

59import GHCJS.DOM.MouseEvent

60−import GHCJS.DOM.Node (appendChild, getOwnerDocument, getParentNode, getPreviousSibling,

60+import GHCJS.DOM.Node (appendChild, getOwnerDocument, getParentNode, getPreviousSibling, removeChild,

61− removeChild, setNodeValue, toNode)

61+ setNodeValue, toNode)

62import qualified GHCJS.DOM.Node as DOM

63import GHCJS.DOM.Types (FocusEvent, IsElement, IsEvent, IsNode, KeyboardEvent, Node, ToDOMString, TouchEvent,

64 WheelEvent, castToHTMLInputElement, castToHTMLSelectElement,

src/Reflex/Dom/Builder/InputDisabled.hs+3−3

@@ -1,9 +1,9 @@

1−{-# LANGUAGE StandaloneDeriving #-}

1+{-# LANGUAGE FlexibleInstances #-}

2{-# LANGUAGE GeneralizedNewtypeDeriving #-}

3+{-# LANGUAGE MultiParamTypeClasses #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

5+{-# LANGUAGE StandaloneDeriving #-}

4{-# LANGUAGE TypeFamilies #-}

6{-# LANGUAGE TypeFamilies #-}

5−{-# LANGUAGE MultiParamTypeClasses #-}

6−{-# LANGUAGE FlexibleInstances #-}

7{-# LANGUAGE UndecidableInstances #-}

8module Reflex.Dom.Builder.InputDisabled where

9

src/Reflex/Dom/Internal.hs+1−1

@@ -19,9 +19,9 @@ import qualified Reflex as R

19import Reflex.Dom.Builder.Immediate

20import Reflex.Dom.Class

21import Reflex.Dom.Internal.Foreign

22+import Reflex.Host.Class

22import Reflex.PerformEvent.Base

23import Reflex.PerformEvent.Base

23import Reflex.PostBuild.Class

24import Reflex.PostBuild.Class

24−import Reflex.Host.Class

25import Reflex.Spider (Global, Spider, SpiderHost, runSpiderHost)

26

27import Control.Concurrent

src/Reflex/Dom/Old.hs+2−2

@@ -69,10 +69,10 @@ import Reflex.Class

69import Reflex.Dom.Builder.Class

70import Reflex.Dom.Builder.Immediate

71import Reflex.Dom.Internal.Foreign

72−import Reflex.PerformEvent.Class

73−import Reflex.PostBuild.Class

74import Reflex.Dom.Widget.Basic

72import Reflex.Dom.Widget.Basic

75import Reflex.Host.Class

73import Reflex.Host.Class

74+import Reflex.PerformEvent.Class

75+import Reflex.PostBuild.Class

76

77data ElConfig attrs = ElConfig

78 { _elConfig_namespace :: Maybe Text

src/Reflex/Dom/WebSocket.hs+1−1

@@ -25,9 +25,9 @@ import Prelude hiding (all, concat, concatMap, div, mapM, mapM_, sequence, span)

25

26import Reflex.Class

27import Reflex.Dom.Class

28+import Reflex.Dom.WebSocket.Foreign

28import Reflex.PerformEvent.Class

29import Reflex.PerformEvent.Class

29import Reflex.PostBuild.Class

30import Reflex.PostBuild.Class

30−import Reflex.Dom.WebSocket.Foreign

31

32import Control.Concurrent

33import Control.Concurrent.STM

src/Reflex/Dom/Widget/Input.hs+2−2

@@ -38,13 +38,13 @@ import GHCJS.DOM.HTMLInputElement (HTMLInputElement)

38import GHCJS.DOM.HTMLTextAreaElement (HTMLTextAreaElement)

39import GHCJS.DOM.Types (File)

40import Reflex.Class

41−import Reflex.Dynamic

42import Reflex.Dom.Builder.Class

41import Reflex.Dom.Builder.Class

43import Reflex.Dom.Builder.Immediate

42import Reflex.Dom.Builder.Immediate

44import Reflex.Dom.Class

43import Reflex.Dom.Class

44+import Reflex.Dom.Widget.Basic

45+import Reflex.Dynamic

45import Reflex.PerformEvent.Class

46import Reflex.PerformEvent.Class

46import Reflex.PostBuild.Class

47import Reflex.PostBuild.Class

47−import Reflex.Dom.Widget.Basic

48import qualified Text.Read as T

49

50import qualified GHCJS.DOM.Event as Event

src/Reflex/Dom/Xhr.hs+2−2

@@ -61,10 +61,10 @@ where

61

62import Reflex.Class

63import Reflex.Dom.Class

64−import Reflex.PerformEvent.Class

65import Reflex.Dom.Xhr.Exception

64import Reflex.Dom.Xhr.Exception

66import Reflex.Dom.Xhr.Foreign

65import Reflex.Dom.Xhr.Foreign

67import Reflex.Dom.Xhr.ResponseType

66import Reflex.Dom.Xhr.ResponseType

67+import Reflex.PerformEvent.Class

68

69import Control.Concurrent

70import Control.Exception (handle)

@@ -79,13 +79,13 @@ import Data.Aeson.Encode

79#endif

80import qualified Data.ByteString.Lazy as BL

81import Data.Default

82+import qualified Data.List as L

82import Data.Map (Map)

83import Data.Map (Map)

83import qualified Data.Map as Map

84import qualified Data.Map as Map

84import Data.Maybe

85import Data.Maybe

85import qualified Data.Set as Set

86import qualified Data.Set as Set

86import Data.Text (Text)

87import Data.Text (Text)

87import qualified Data.Text as T

88import qualified Data.Text as T

88−import qualified Data.List as L

89import Data.Text.Encoding

90import qualified Data.Text.Lazy as LT

91import qualified Data.Text.Lazy.Builder as B