aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Markdown.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2017-05-17 12:47:03 +0200
committerGitHub <noreply@github.com>2017-05-17 12:47:03 +0200
commit377733e08fdaea359e73b03952913cc32b537d9e (patch)
tree9a3494f15f1c31b1d6d1588838e0fb6e88691390 /src/Text/Pandoc/Readers/Markdown.hs
parent602cd6a327ad41e68e47689d3842f349cf33444d (diff)
parent55ce47d050fd6e1a38db765c7632e1989d60854d (diff)
downloadpandoc-377733e08fdaea359e73b03952913cc32b537d9e.tar.gz
Merge pull request #3677 from labdsf/anylinenewline
Move anyLineNewline to Parsing.hs
Diffstat (limited to 'src/Text/Pandoc/Readers/Markdown.hs')
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 0c0d07140..7434ef1f6 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -614,7 +614,7 @@ hrule = try $ do
--
indentedLine :: PandocMonad m => MarkdownParser m String
-indentedLine = indentSpaces >> anyLine >>= return . (++ "\n")
+indentedLine = indentSpaces >> anyLineNewline
blockDelimiter :: PandocMonad m
=> (Char -> Bool)