Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ghc-commonmark for openSUSE:Factory checked in at 2023-11-08 22:17:40 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ghc-commonmark (Old) and /work/SRC/openSUSE:Factory/.ghc-commonmark.new.17445 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-commonmark" Wed Nov 8 22:17:40 2023 rev:14 rq:1124057 version:0.2.4 Changes: -------- --- /work/SRC/openSUSE:Factory/ghc-commonmark/ghc-commonmark.changes 2023-07-04 15:22:48.814361987 +0200 +++ /work/SRC/openSUSE:Factory/.ghc-commonmark.new.17445/ghc-commonmark.changes 2023-11-08 22:17:57.191669767 +0100 @@ -1,0 +2,16 @@ +Fri Oct 27 17:00:53 UTC 2023 - Peter Simons <psim...@suse.com> + +- Update commonmark to version 0.2.4. + ## 0.2.4 + + * Do not parse hard line breaks in fenced codeblock info (#116, + Michael Howell). This change makes commonmark-hs conform to the spec + and behave like other implementations when an info string in a code + block ends with a backslash. + + * [API change] Commonmark.Inlines now exports `pEscapedSymbol` + (#116, Michael Howell). + + * Tokenize combining marks as WordChars not Symbol (#114). + +------------------------------------------------------------------- Old: ---- commonmark-0.2.3.tar.gz New: ---- commonmark-0.2.4.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ghc-commonmark.spec ++++++ --- /var/tmp/diff_new_pack.deZeWz/_old 2023-11-08 22:17:57.999699452 +0100 +++ /var/tmp/diff_new_pack.deZeWz/_new 2023-11-08 22:17:57.999699452 +0100 @@ -20,7 +20,7 @@ %global pkgver %{pkg_name}-%{version} %bcond_with tests Name: ghc-%{pkg_name} -Version: 0.2.3 +Version: 0.2.4 Release: 0 Summary: Pure Haskell commonmark parser License: BSD-3-Clause ++++++ commonmark-0.2.3.tar.gz -> commonmark-0.2.4.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/commonmark-0.2.3/changelog.md new/commonmark-0.2.4/changelog.md --- old/commonmark-0.2.3/changelog.md 2001-09-09 03:46:40.000000000 +0200 +++ new/commonmark-0.2.4/changelog.md 2001-09-09 03:46:40.000000000 +0200 @@ -1,5 +1,17 @@ # Changelog for commonmark +## 0.2.4 + + * Do not parse hard line breaks in fenced codeblock info (#116, + Michael Howell). This change makes commonmark-hs conform to the spec + and behave like other implementations when an info string in a code + block ends with a backslash. + + * [API change] Commonmark.Inlines now exports `pEscapedSymbol` + (#116, Michael Howell). + + * Tokenize combining marks as WordChars not Symbol (#114). + ## 0.2.3 * Re-export Text.Parsec.Pos from Commonmark.Types (Fraser diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/commonmark-0.2.3/commonmark.cabal new/commonmark-0.2.4/commonmark.cabal --- old/commonmark-0.2.3/commonmark.cabal 2001-09-09 03:46:40.000000000 +0200 +++ new/commonmark-0.2.4/commonmark.cabal 2001-09-09 03:46:40.000000000 +0200 @@ -1,6 +1,6 @@ cabal-version: 2.2 name: commonmark -version: 0.2.3 +version: 0.2.4 synopsis: Pure Haskell commonmark parser. description: This library provides the core data types and functions diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/commonmark-0.2.3/src/Commonmark/Blocks.hs new/commonmark-0.2.4/src/Commonmark/Blocks.hs --- old/commonmark-0.2.3/src/Commonmark/Blocks.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/commonmark-0.2.4/src/Commonmark/Blocks.hs 2001-09-09 03:46:40.000000000 +0200 @@ -52,7 +52,7 @@ import Commonmark.Tag import Commonmark.TokParsers import Commonmark.ReferenceMap -import Commonmark.Inlines (pEscaped, pLinkDestination, +import Commonmark.Inlines (pEscapedSymbol, pLinkDestination, pLinkLabel, pLinkTitle) import Commonmark.Entity (unEntity) import Commonmark.Tokens @@ -1042,7 +1042,7 @@ guard $ fencelength >= 3 skipWhile (hasType Spaces) let infoTok = noneOfToks (LineEnd : [Symbol '`' | c == '`']) - info <- T.strip . unEntity <$> many (pEscaped <|> infoTok) + info <- T.strip . unEntity <$> many (pEscapedSymbol <|> infoTok) lookAhead $ void lineEnd <|> eof let infotoks = tokenize "info string" info diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/commonmark-0.2.3/src/Commonmark/Inlines.hs new/commonmark-0.2.4/src/Commonmark/Inlines.hs --- old/commonmark-0.2.3/src/Commonmark/Inlines.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/commonmark-0.2.4/src/Commonmark/Inlines.hs 2001-09-09 03:46:40.000000000 +0200 @@ -24,6 +24,7 @@ , pLinkDestination , pLinkTitle , pEscaped + , pEscapedSymbol , processEmphasis , processBrackets , pBacktickSpan @@ -937,6 +938,12 @@ bs <- symbol '\\' option bs $ satisfyTok asciiSymbol <|> lineEnd +-- parses backslash + punctuation, but not backslashed newline +pEscapedSymbol :: Monad m => ParsecT [Tok] s m Tok +pEscapedSymbol = do + bs <- symbol '\\' + option bs $ satisfyTok asciiSymbol + asciiSymbol :: Tok -> Bool asciiSymbol (Tok (Symbol c) _ _) = isAscii c asciiSymbol _ = False diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/commonmark-0.2.3/src/Commonmark/Tokens.hs new/commonmark-0.2.4/src/Commonmark/Tokens.hs --- old/commonmark-0.2.3/src/Commonmark/Tokens.hs 2001-09-09 03:46:40.000000000 +0200 +++ new/commonmark-0.2.4/src/Commonmark/Tokens.hs 2001-09-09 03:46:40.000000000 +0200 @@ -10,7 +10,7 @@ , untokenize ) where -import Unicode.Char (isAlphaNum) +import Unicode.Char (isAlphaNum, isMark) import Unicode.Char.General.Compat (isSpace) import Data.Text (Text) import qualified Data.Text as T @@ -42,7 +42,9 @@ -- everything else gets in a token by itself. f '\r' '\n' = True f ' ' ' ' = True - f x y = isAlphaNum x && isAlphaNum y + f x y = isWordChar x && isWordChar y + + isWordChar c = isAlphaNum c || isMark c go !_pos [] = [] go !pos (!t:ts) = -- note that t:ts are guaranteed to be nonempty @@ -57,7 +59,7 @@ '\n' -> Tok LineEnd pos t : go (incSourceLine (setSourceColumn pos 1) 1) ts thead - | isAlphaNum thead -> + | isWordChar thead -> Tok WordChars pos t : go (incSourceColumn pos (T.length t)) ts | isSpace thead -> diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/commonmark-0.2.3/test/regression.md new/commonmark-0.2.4/test/regression.md --- old/commonmark-0.2.3/test/regression.md 2001-09-09 03:46:40.000000000 +0200 +++ new/commonmark-0.2.4/test/regression.md 2001-09-09 03:46:40.000000000 +0200 @@ -203,3 +203,19 @@ <p><a href="http://www.example.com/">test </a> <a href="http://www.example.com/"> test</a></p> ```````````````````````````````` + +Issue #114. +```````````````````````````````` example +*.*Ì. +. +<p>*.*Ì.</p> +```````````````````````````````` + +Issue #115. +```````````````````````````````` example +~~~\ +x +. +<pre><code class="language-\">x +</code></pre> +````````````````````````````````