packages feed

feed-collect 0.1.0.0 → 0.1.0.1

raw patch · 3 files changed

+30/−5 lines, 3 filesdep +utf8-stringdep −bytestringPVP ok

version bump matches the API change (PVP)

Dependencies added: utf8-string

Dependencies removed: bytestring

API changes (from Hackage documentation)

Files

NEWS view
@@ -3,6 +3,32 @@   +feed-collect 0.1.0.1 -- 2015-09-15+==================================++General, build and documentation changes:++* (None)++New APIs, features and enhancements:++* (None)++Bug fixes:++* The feed XML file was being parsed in a byte-based manner, which works right+  only for ASCII (or other single-byte encodings). Now the parsing involves+  UTF-8 encoding.++Dependency changes:++* Add utf8-string (but it already was an indirect dependency before)+* Remove bytestring (but it's still an indirect dependency)+++++ feed-collect 0.1.0.0 -- 2015-09-11 ================================== 
feed-collect.cabal view
@@ -1,5 +1,5 @@ name:                feed-collect-version:             0.1.0.0+version:             0.1.0.1 synopsis:            Watch RSS/Atom feeds (and do with them whatever you like). description:   RSS and Atom are common technologies for publishing news updates and watching@@ -38,8 +38,6 @@   other-modules:       Control.Applicative.Util   -- other-extensions:       build-depends:       base            >=4.7 && <5-                     , bytestring---                     , exceptions                      , feed            >=0.3.9                      , http-client     >=0.4.19                      , http-client-tls >=0.2.2@@ -47,6 +45,7 @@                      , timerep         >=2                      , time-units      >=1                      , transformers+                     , utf8-string     >=1   hs-source-dirs:      src   default-language:    Haskell2010   ghc-options:         -Wall
src/Web/Feed/Collect.hs view
@@ -149,7 +149,7 @@ import           Control.Exception (catch) import           Control.Monad (liftM, when) import           Control.Monad.IO.Class (MonadIO, liftIO)-import qualified Data.ByteString.Lazy.Char8 as BC+import qualified Data.ByteString.Lazy.UTF8 as BU import           Data.Maybe (catMaybes, fromMaybe, listToMaybe) import           Data.Time.Clock (UTCTime) import           Data.Time.Format@@ -433,7 +433,7 @@     let action = do             request <- parseUrl url             response <- httpLbs request manager-            return $ Right $ BC.unpack $ responseBody response+            return $ Right $ BU.toString $ responseBody response         handler e = return $ Left (e :: HttpException)     in  action `catch` handler