xml-lens 0.1.2 → 0.1.3

raw patch · 2 files changed

+13/−3 lines, 2 filesdep ~xml-conduit

Dependency ranges changed: xml-conduit

Files

• Text/XML/Lens.hs +11/−1
• xml-lens.cabal +2/−2

@@ -16,6 +16,7 @@     -- ** Names     , name     , el+    , ell     -- ** Attributes     , attributeIs     , attributeSatisfies@@ -45,6 +46,9 @@     -- * Lenses for 'Instruction'     , _instructionTarget     , _instructionData+    -- * Reexports+    , module Control.Lens+    , module Text.XML     ) where import Text.XML import Control.Lens@@ -136,12 +140,18 @@ -- | Traverse itself with its all children. entire :: Traversal' Element Element entire f e@(Element _ _ ns) = com <$> f e <*> traverse (_Element (entire f)) ns where-    com (Element n a _) ns = Element n a ns+    com (Element n a _) = Element n a  -- | Traverse elements which has the specified name. el :: Name -> Traversal' Element Element el n f s     | elementName s == n = f s+    | otherwise = pure s++-- | Traverse elements which has the specified *local* name. +ell :: Text -> Traversal' Element Element+ell n f s+    | nameLocalName (elementName s) == n = f s     | otherwise = pure s  attributeSatisfies :: Name -> (Text -> Bool) -> Traversal' Element Element

@@ -1,5 +1,5 @@ name:                xml-lens-version:             0.1.2+version:             0.1.3 synopsis:            Lenses, traversals, prisms for xml-conduit description:         Lens-based DOM selector homepage:            https://github.com/fumieval/xml-lens@@ -20,4 +20,4 @@   default-language:   Haskell2010   ghc-options: -Wall   exposed-modules:     Text.XML.Lens-  build-depends:       base ==4.*, lens >= 3.8 && < 4.2, containers >= 0.4.0 && < 0.6, text == 0.11.*, xml-conduit >= 1.1+  build-depends:       base ==4.*, lens >= 3.8 && < 4.2, containers >= 0.4.0 && < 0.6, text == 0.11.*, xml-conduit >= 1.1 && < 1.3