From 13698e79680c656392aecc51a60cd1e6e19bdefa Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Mon, 6 Mar 2017 21:18:32 +0100
Subject: Markdown writer:  Fixed false ordered lists in YAML metadata.

Now we properly escape things that would otherwise start ordered
lists, such as

    ---
    title: 1. inline
    ...

Closes #3492.
Closes #1685.
---
 src/Text/Pandoc/Writers/Markdown.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs
index f665ec448..ad3eb62df 100644
--- a/src/Text/Pandoc/Writers/Markdown.hs
+++ b/src/Text/Pandoc/Writers/Markdown.hs
@@ -185,7 +185,7 @@ pandocToMarkdown opts (Pandoc meta blocks) = do
   isPlain <- asks envPlain
   metadata <- metaToJSON'
                (fmap (render colwidth) . blockListToMarkdown opts)
-               (fmap (render colwidth) . inlineListToMarkdown opts)
+               (fmap (render colwidth) . blockToMarkdown opts . Plain)
                meta
   let title' = maybe empty text $ getField "title" metadata
   let authors' = maybe [] (map text) $ getField "author" metadata
-- 
cgit v1.2.3