atom-conduit 0.4.0.1 → 0.4.0.2
raw patch · 2 files changed
+5/−5 lines, 2 filesdep ~xml-conduitPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: xml-conduit
API changes (from Hackage documentation)
Files
- Text/Atom/Conduit/Parse.hs +3/−3
- atom-conduit.cabal +2/−2
Text/Atom/Conduit/Parse.hs view
@@ -87,7 +87,7 @@ -- | Like 'tagName' but ignores the namespace. tagName' :: MonadThrow m => Text -> AttrParser a -> (a -> ConduitM Event o m b) -> ConduitM Event o m (Maybe b)-tagName' t = tagPredicate (\n -> nameLocalName n == t && nameNamespace n == Just "http://www.w3.org/2005/Atom")+tagName' t = tag' (matching $ \n -> nameLocalName n == t && nameNamespace n == Just "http://www.w3.org/2005/Atom") -- | Tag which content is a date-time that follows RFC 3339 format. tagDate :: MonadThrow m => Text -> ConduitM Event o m (Maybe UTCTime)@@ -100,7 +100,7 @@ tagIgnoreAttrs' name handler = tagName' name ignoreAttrs $ const handler xhtmlContent :: MonadThrow m => ConduitM Event o m Text-xhtmlContent = fmap (decodeUtf8 . toByteString) $ takeAllTreesContent =$= Render.renderBuilder def =$= foldC+xhtmlContent = fmap (decodeUtf8 . toByteString) $ many_ takeAnyTreeContent =$= Render.renderBuilder def =$= foldC projectC :: Monad m => Fold a a' b b' -> Conduit a m b@@ -138,7 +138,7 @@ -- > <uri>http://example.com/~johndoe</uri> -- > </author> atomPerson :: MonadThrow m => Text -> ConduitM Event o m (Maybe AtomPerson)-atomPerson name = tagIgnoreAttrs' name $ (manyYield' (choose piece) =$= parser) <* many ignoreAllTreesContent where+atomPerson name = tagIgnoreAttrs' name $ (manyYield' (choose piece) =$= parser) <* many ignoreAnyTreeContent where parser = getZipConduit $ AtomPerson <$> ZipConduit (projectC _PersonName =$= headRequiredC "Missing or invalid <name> element") <*> ZipConduit (projectC _PersonEmail =$= headDefC "")
atom-conduit.cabal view
@@ -1,5 +1,5 @@ name: atom-conduit-version: 0.4.0.1+version: 0.4.0.2 synopsis: Streaming parser/renderer for the Atom 1.0 standard (RFC 4287). description: Please refer to README. license: PublicDomain@@ -35,7 +35,7 @@ , time >= 1.5 , timerep >= 2.0 , uri-bytestring >= 0.2- , xml-conduit >= 1.4+ , xml-conduit >= 1.5 , xml-types default-language: Haskell2010