sundown 0.5.3 → 0.6

raw patch · 5 files changed

+12/−12 lines, 5 files

Files

src/Text/Sundown/Html.hs +4/−4
src/Text/Sundown/Html/ByteString.hs +3/−3
src/Text/Sundown/Html/String.hs +2/−2
src/Text/Sundown/Html/Text.hs +2/−2
sundown.cabal +1/−1

src/Text/Sundown/Html.hs view

@@ -45,16 +45,16 @@  -- | Parses markdown, returns the Html. renderHtml :: (ToBS a, FromBS b)-           => a-           -> Extensions+           => Extensions            -> HtmlRenderMode            -> Bool              -- ^ If true, smartypant the output            -> Maybe Int            -- ^ The maximum nesting of the HTML. If Nothing, a default value            -- (16) will be used.+           -> a            -> b-renderHtml input exts mode sp maxNestingM =-    fromBS $ BS.renderHtml (toBS input) exts mode sp maxNestingM+renderHtml exts mode sp maxNestingM input =+    fromBS $ BS.renderHtml exts mode sp maxNestingM $ toBS input  smartypants :: (ToBS a, FromBS b) => a -> b smartypants = fromBS . BS.smartypants . toBS

src/Text/Sundown/Html/ByteString.hs view

@@ -38,16 +38,16 @@ defaultMaxNesting = 16  -- | Parses a 'ByteString' containing the markdown, returns the Html code.-renderHtml :: ByteString-           -> Extensions+renderHtml :: Extensions            -> HtmlRenderMode            -> Bool              -- ^ If true, smartypant the output            -> Maybe Int            -- ^ The maximum nesting of the HTML. If Nothing, a default value            -- (16) will be used.            -> ByteString+           -> ByteString {-# NOINLINE renderHtml #-}-renderHtml input exts mode sp maxNestingM =+renderHtml exts mode sp maxNestingM input =     unsafePerformIO $     alloca $ \callbacks ->     alloca $ \options ->

src/Text/Sundown/Html/String.hs view

@@ -15,13 +15,13 @@ import qualified Text.Sundown.Html as Sundown  -- | Parses a 'String' containing the markdown, returns the Html code.-renderHtml :: String-           -> Extensions+renderHtml :: Extensions            -> HtmlRenderMode            -> Bool              -- ^ If true, smartypant the output            -> Maybe Int            -- ^ The maximum nesting of the HTML. If Nothing, a default value            -- (16) will be used.+           -> String            -> String renderHtml = Sundown.renderHtml

src/Text/Sundown/Html/Text.hs view

@@ -17,13 +17,13 @@ import qualified Text.Sundown.Html as Sundown  -- | Parses a 'Text' containing the markdown, returns the Html code.-renderHtml :: Text-           -> Extensions+renderHtml :: Extensions            -> HtmlRenderMode            -> Bool              -- ^ If true, smartypant the output            -> Maybe Int            -- ^ The maximum nesting of the HTML. If Nothing, a default value            -- (16) will be used.+           -> Text            -> Text renderHtml = Sundown.renderHtml

sundown.cabal view

@@ -1,6 +1,6 @@ Cabal-version:      >= 1.6 Name:               sundown-Version:            0.5.3+Version:            0.6 Author:             Francesco Mazzoli (f@mazzo.li) Maintainer:         Francesco Mazzoli (f@mazzo.li) Build-Type:         Simple