tagsoup-navigate 0.1.0.6 → 0.1.0.7

raw patch · 3 files changed

+18/−1 lines, 3 filesPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

API changes (from Hackage documentation)

Files

• changelog.md +4/−0
• src/Text/HTML/TagSoup/Navigate/Types/TagTreePosState.hs +13/−0
• tagsoup-navigate.cabal +1/−1

@@ -1,3 +1,7 @@+0.1.0.7++* Added `afters` and `befores`+ 0.1.0.6  * fix bug in depth-first search

@@ -32,7 +32,9 @@ , nextSibling , content , before+, befores , after+, afters , parents , liftTagTreePosState , putTagTree@@ -64,6 +66,7 @@ import Data.Functor.Bind(Bind((>>-))) import Data.Functor.Const(Const) import Data.Functor.Identity(Identity(Identity, runIdentity))+import Data.List.NonEmpty import Data.Maybe(Maybe(Nothing, Just)) import Data.Semigroup(Semigroup((<>))) import Data.Monoid(Monoid(mempty, mappend), First)@@ -326,10 +329,20 @@ before =   gets (view tagTreePosBefore) +befores ::+  TagTreePosState x (NonEmpty (TagTree x))+befores =+  liftA2 (:|) content before+ after ::   TagTreePosState x [TagTree x] after =   gets (view tagTreePosAfter)++afters ::+  TagTreePosState x (NonEmpty (TagTree x))+afters =+  liftA2 (:|) content after  parents ::   TagTreePosState x [TagTreePosParent x]

@@ -1,5 +1,5 @@ name:                 tagsoup-navigate-version:              0.1.0.6+version:              0.1.0.7 synopsis:             Tagsoup Navigate description:          Lenses and data types for navigating tagsoup license:              BSD3