commonmark-pandoc 0.1.0.0 → 0.2.0.0

raw patch · 4 files changed

+19/−3 lines, 4 filesdep ~commonmark-extensionsPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: commonmark-extensions

API changes (from Hackage documentation)

Files

• README.md +2/−0
• changelog.md +8/−1
• commonmark-pandoc.cabal +2/−2
• src/Commonmark/Pandoc.hs +7/−0

@@ -1,5 +1,7 @@ # commonmark-pandoc +[![hackage release](https://img.shields.io/hackage/v/commonmark-pandoc.svg?label=hackage)](http://hackage.haskell.org/package/commonmark-pandoc)+ This package provides typeclass instances for parsing commonmark directly into the `Pandoc` AST. 

@@ -1,3 +1,10 @@ # Changelog for commonmark-pandoc -## Unreleased changes+## 0.2.0.0++- Add HasQuoted instance.+- Apply attributes directly to Table element (#47).++## 0.1.0.0++- Initial release

@@ -1,5 +1,5 @@ name:           commonmark-pandoc-version:        0.1.0.0+version:        0.2.0.0 synopsis:       Bridge between commonmark and pandoc AST. description:    This library provides typeclasses for rendering                 commonmark to Pandoc types.@@ -28,7 +28,7 @@   build-depends:       base >=4.7 && <5     , commonmark >= 0.1 && < 0.2-    , commonmark-extensions >= 0.1 && < 0.2+    , commonmark-extensions >= 0.2 && < 0.3     , pandoc-types >= 1.21 && < 1.22     , text     , containers

@@ -31,6 +31,7 @@ import Commonmark.Extensions.Attributes import Commonmark.Extensions.Footnote import Commonmark.Extensions.TaskList+import Commonmark.Extensions.Smart import Data.Char (isSpace) import Data.Coerce (coerce) #if !MIN_VERSION_base(4,11,0)@@ -112,6 +113,10 @@   inlineMath t = Cm $ B.math t   displayMath t = Cm $ B.displayMath t +instance Rangeable (Cm b B.Inlines) => HasQuoted (Cm b B.Inlines) where+  singleQuoted x = B.singleQuoted <$> x+  doubleQuoted x = B.doubleQuoted <$> x+ instance HasEmoji (Cm b B.Inlines) where   emoji kw t = Cm $ B.spanWith ("",["emoji"],[("data-emoji",kw)])                   $ B.text t@@ -188,6 +193,8 @@   Header n (addToPandocAttr attrs curattrs) ils addBlockAttrs attrs (CodeBlock curattrs s) =   CodeBlock (addToPandocAttr attrs curattrs) s+addBlockAttrs attrs (Table curattrs capt colspecs thead tbody tfoot) =+  Table (addToPandocAttr attrs curattrs) capt colspecs thead tbody tfoot addBlockAttrs attrs (Div curattrs bs) =   Div (addToPandocAttr attrs curattrs) bs addBlockAttrs attrs x =