Hello community, here is the log from the commit of package ghc-scalpel-core for openSUSE:Factory checked in at 2017-06-04 01:55:14 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-scalpel-core (Old) and /work/SRC/openSUSE:Factory/.ghc-scalpel-core.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-scalpel-core" Sun Jun 4 01:55:14 2017 rev:2 rq:494185 version:0.5.1 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-scalpel-core/ghc-scalpel-core.changes 2017-04-12 18:08:52.604226462 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-scalpel-core.new/ghc-scalpel-core.changes 2017-06-04 01:55:15.342966407 +0200 @@ -1,0 +2,5 @@ +Wed May 3 08:14:02 UTC 2017 - [email protected] + +- Update to version 0.5.1 with cabal2obs. + +------------------------------------------------------------------- Old: ---- scalpel-core-0.5.0.tar.gz New: ---- scalpel-core-0.5.1.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-scalpel-core.spec ++++++ --- /var/tmp/diff_new_pack.SVfcOf/_old 2017-06-04 01:55:15.838896342 +0200 +++ /var/tmp/diff_new_pack.SVfcOf/_new 2017-06-04 01:55:15.842895777 +0200 @@ -19,7 +19,7 @@ %global pkg_name scalpel-core %bcond_with tests Name: ghc-%{pkg_name} -Version: 0.5.0 +Version: 0.5.1 Release: 0 Summary: A high level web scraping library for Haskell License: Apache-2.0 ++++++ scalpel-core-0.5.0.tar.gz -> scalpel-core-0.5.1.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/scalpel-core-0.5.0/CHANGELOG.md new/scalpel-core-0.5.1/CHANGELOG.md --- old/scalpel-core-0.5.0/CHANGELOG.md 2017-02-05 05:43:42.000000000 +0100 +++ new/scalpel-core-0.5.1/CHANGELOG.md 2017-04-25 05:08:43.000000000 +0200 @@ -2,6 +2,10 @@ ## HEAD +## 0.5.1 + +- Fix bug (#59, #54) in DFS traversal order. + ## 0.5.0 - Split `scalpel` into two packages: `scalpel` and `scalpel-core`. The latter diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/scalpel-core-0.5.0/scalpel-core.cabal new/scalpel-core-0.5.1/scalpel-core.cabal --- old/scalpel-core-0.5.0/scalpel-core.cabal 2017-02-05 05:43:42.000000000 +0100 +++ new/scalpel-core-0.5.1/scalpel-core.cabal 2017-04-25 05:08:43.000000000 +0200 @@ -1,5 +1,5 @@ name: scalpel-core -version: 0.5.0 +version: 0.5.1 synopsis: A high level web scraping library for Haskell. description: Scalpel core provides a subset of the scalpel web scraping library that is @@ -24,7 +24,7 @@ source-repository this type: git location: https://github.com/fimad/scalpel.git - tag: v0.5.0 + tag: v0.5.1 library other-extensions: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/scalpel-core-0.5.0/src/Text/HTML/Scalpel/Internal/Select.hs new/scalpel-core-0.5.1/src/Text/HTML/Scalpel/Internal/Select.hs --- old/scalpel-core-0.5.0/src/Text/HTML/Scalpel/Internal/Select.hs 2017-02-05 05:03:44.000000000 +0100 +++ new/scalpel-core-0.5.1/src/Text/HTML/Scalpel/Internal/Select.hs 2017-04-25 05:02:54.000000000 +0200 @@ -219,8 +219,8 @@ | nodeMatches n info = (shrunkSpec :) $ selectNodes [n] (tags, fs, ctx) $ selectNodes [n] (tags, Tree.subForest f, ctx) acc - | otherwise = selectNodes [n] (tags, fs, ctx) - $ selectNodes [n] (tags, Tree.subForest f, ctx) acc + | otherwise = selectNodes [n] (tags, Tree.subForest f, ctx) + $ selectNodes [n] (tags, fs, ctx) acc where Span lo hi = Tree.rootLabel f shrunkSpec = ( diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/scalpel-core-0.5.0/tests/TestMain.hs new/scalpel-core-0.5.1/tests/TestMain.hs --- old/scalpel-core-0.5.0/tests/TestMain.hs 2017-02-05 05:03:44.000000000 +0100 +++ new/scalpel-core-0.5.1/tests/TestMain.hs 2017-04-25 05:03:03.000000000 +0200 @@ -296,6 +296,26 @@ index <- position content <- text anySelector return (index, content)) + + , scrapeTest + "<div><p>p1</p><p>p2</p><blockquote><p>p3</p></blockquote><p>p4</p>" + (Just ["p1", "p2", "p3", "p4"]) + (texts "p") + + , scrapeTest + "<a><b>1</b></a><a><b>2</b></a><a><b>3</b></a>" + (Just ["1","2","3"]) + (texts "a") + + , scrapeTest + "<a><b>1</b></a><a><b>2</b></a><a><b>3</b></a>" + (Just ["1","2","3"]) + (texts $ "a" // "b") + + , scrapeTest + "<a><b>1</b></a><a><b>2</b></a><a><b>3</b></a>" + (Just ["1","2","3"]) + (texts "b") ] scrapeTest :: (Eq a, Show a) => String -> Maybe a -> Scraper String a -> Test
