master..aff453f · typeable/dom-parser

dom-parser.cabal+3−2

since splitsnapshots

unifiedsplit

@@ -44,12 +44,13 @@ library

44 , TypeFamilies

45 , TypeOperators

46 , UndecidableInstances

47− build-depends: base >= 4.11 && < 5

47+ build-depends: base >= 4.7 && < 5

48 , case-insensitive

49 , containers

50 , lens

51− , mtl < 2.3 || > 2.3

51+ , mtl

52 , scientific

53+ , semigroups

53 , text

54 , text

54 , transformers

55 , transformers

55 , xml-conduit

56 , xml-conduit

src/Text/XML/DOM/Parser/Combinators.hs+1

@@ -22,6 +22,7 @@ import Control.Monad.Reader

22import Data.Foldable as F

23import Data.List as L

24import Data.List.NonEmpty (NonEmpty(..))

25+import Data.Monoid

25import Data.Text as T

26import Data.Text as T

26import Data.Traversable

27import Data.Traversable

27import Text.XML

28import Text.XML

src/Text/XML/DOM/Parser/Content.hs+1−2

@@ -20,7 +20,6 @@ import Data.List as L

20import Data.Monoid

21import Data.Text as T

22import Data.Typeable

23−import Prelude as P

24import Text.Read

23import Text.Read

25import Text.XML.DOM.Parser.Types

24import Text.XML.DOM.Parser.Types

26import Text.XML.Lens

25import Text.XML.Lens

@@ -94,7 +93,7 @@ maybeReadContent

94maybeReadContent f t = maybe (Left msg) Right $ f t

93maybeReadContent f t = maybe (Left msg) Right $ f t

95 where

94 where

96 msg = "Not readable " <> n <> ": " <> t

95 msg = "Not readable " <> n <> ": " <> t

97− n = T.pack $ P.show $ typeRep (Proxy :: Proxy a)

96+ n = T.pack $ show $ typeRep (Proxy :: Proxy a)

98

97

99

98

100-- | Tries to read given text to value using 'Read'. Useful to use

99-- | Tries to read given text to value using 'Read'. Useful to use

src/Text/XML/DOM/Parser/Types.hs+1

@@ -36,6 +36,7 @@ import Control.Lens

36import Control.Monad.Except

37import Control.Monad.Reader

38import Data.CaseInsensitive as CI

39+import Data.Semigroup

39import Data.String

40import Data.String

40import Data.Text as T

41import Data.Text as T

41import GHC.Generics (Generic)

42import GHC.Generics (Generic)