aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-10-22 03:03:11 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-10-22 03:05:17 +0300
commit875e33ecf698396418d722d77f74cf07835058d2 (patch)
tree09635e3709e6b789eecaf0a92fed579bfa7935e5 /test/Tests/Readers
parent95b9d940923c066630d0de822bf6f509e7f83db2 (diff)
downloadpandoc-875e33ecf698396418d722d77f74cf07835058d2.tar.gz
Muse reader: allow footnotes to start with empty line
A space character was required after footnote marker, now newline is allowed.
Diffstat (limited to 'test/Tests/Readers')
-rw-r--r--test/Tests/Readers/Muse.hs17
1 files changed, 17 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index ab0579519..36724b33c 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -797,6 +797,23 @@ tests =
, "baz"
] =?>
para (str "Foo" <> note (lineBlock ["bar"])) <> para (str "baz")
+
+ , "Footnote starting with empty line" =:
+ T.unlines [ "Foo[1]"
+ , ""
+ , "[1]" -- No space character after note marker
+ , ""
+ , " Bar"
+ ] =?>
+ para (str "Foo" <> note (para $ text "Bar"))
+ , "Indentation in footnote starting with empty line" =:
+ T.unlines [ "Foo[1]"
+ , ""
+ , "[1]" -- No space character after note marker
+ , ""
+ , " Bar"
+ ] =?>
+ para (str "Foo" <> note mempty) <> blockQuote (para $ text "Bar")
, test emacsMuse "Emacs multiparagraph footnotes"
(T.unlines
[ "First footnote reference[1] and second footnote reference[2]."