diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2017-12-20 14:00:30 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2017-12-20 14:00:30 +0300 |
| commit | b5e62a5c0963cf10338170a94f6a5a2c5b39ad1d (patch) | |
| tree | ee79f94f2ad598c41e9cc1c068364af50c1414a4 /test | |
| parent | ac202e648b1c72e55737dc1e71ed94937ad5e835 (diff) | |
| download | pandoc-b5e62a5c0963cf10338170a94f6a5a2c5b39ad1d.tar.gz | |
Muse reader: require that note references does not start with 0
Diffstat (limited to 'test')
| -rw-r--r-- | test/Tests/Readers/Muse.hs | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs index 41d1d9710..513b54a65 100644 --- a/test/Tests/Readers/Muse.hs +++ b/test/Tests/Readers/Muse.hs @@ -505,6 +505,20 @@ tests = ] =?> para (text "Start recursion here" <> note (para "Recursion continues here[1]")) + , "No zero footnotes" =: + T.unlines [ "Here is a footnote[0]." + , "" + , "[0] Footnote contents" + ] =?> + para "Here is a footnote[0]." <> + para "[0] Footnote contents" + , "Footnotes can't start with zero" =: + T.unlines [ "Here is a footnote[01]." + , "" + , "[01] Footnote contents" + ] =?> + para "Here is a footnote[01]." <> + para "[01] Footnote contents" , testGroup "Multiparagraph footnotes" [ "Amusewiki multiparagraph footnotes" =: T.unlines [ "Multiparagraph[1] footnotes[2]" |