markdown 0.1.17.3 → 0.1.17.4

raw patch · 5 files changed

+14/−7 lines, 5 filesdep +bytestringPVP ok

version bump matches the API change (PVP)

Dependencies added: bytestring

API changes (from Hackage documentation)

Files

• ChangeLog.md +4/−0
• markdown.cabal +2/−1
• test/examples/multiline-paragraphs.html +1/−1
• test/examples/multiline-paragraphs.md +1/−1
• test/main.hs +6/−4

@@ -1,5 +1,9 @@ # Changelog for markdown +## 0.1.17.4++* One more fix for test suite, now works on Windows as well+ ## 0.1.17.3  * Fix the previous test fix

@@ -1,5 +1,5 @@ Name:                markdown-Version:             0.1.17.3+Version:             0.1.17.4 Synopsis:            Convert Markdown to HTML, with XSS protection Description:         This library leverages existing high-performance libraries (attoparsec, blaze-html, text, and conduit), and should integrate well with existing codebases. Homepage:            https://github.com/snoyberg/markdown@@ -49,6 +49,7 @@                  , base             >= 4       && < 5                  , hspec            >= 1.3                  , blaze-html+                 , bytestring                  , call-stack                  , text                  , transformers

@@ -1,5 +1,5 @@ <p>This is a multiline paragraph.</p><ul><li><p>Multiline paragraph in a list.</p></li><li><p>The purpose of classy prelude is <i>not</i> to encourage writing polymorphic-code based on the typeclasses provided. Though it's certainly possible to+code based on the typeclasses provided. Though it is certainly possible to write code such as:</p></li></ul>

@@ -5,5 +5,5 @@      in a list.  *   The purpose of classy prelude is *not* to encourage writing polymorphic-    code based on the typeclasses provided. Though it's certainly possible to+    code based on the typeclasses provided. Though it is certainly possible to     write code such as:

@@ -4,7 +4,9 @@ import Test.Hspec import Text.Markdown import Data.Text.Lazy (Text, unpack, snoc, fromStrict)+import qualified Data.ByteString as B import qualified Data.Text as T+import Data.Text.Encoding (decodeUtf8) import qualified Data.Text.IO as TIO import qualified Data.Text.Lazy as TL import Text.Blaze.Html.Renderer.Text (renderHtml)@@ -272,8 +274,8 @@     dir = "test/examples"     go basename = do         let fp = dir </> basename-        input <- TIO.readFile fp-        output <- TIO.readFile $ replaceExtension fp "html"+        input <- decodeUtf8 <$> B.readFile fp+        output <- decodeUtf8 <$> B.readFile (replaceExtension fp "html")         let (checker, stripper)                 | "-spec" `isInfixOf` fp = (check', dropFinalLF)                 | otherwise = (check, T.strip)@@ -290,6 +292,6 @@     dir = "test/Tests"     go basename = do         let fp = dir </> basename-        input <- TIO.readFile fp-        output <- TIO.readFile $ replaceExtension fp "html"+        input <- decodeUtf8 <$> B.readFile fp+        output <- decodeUtf8 <$> B.readFile (replaceExtension fp "html")         return $ it basename $ checkNoNL (fromStrict $ T.strip output) (fromStrict input)