diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2015-12-12 12:21:36 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2015-12-12 12:58:31 -0800 |
| commit | d6a4c70ef8c9a8f19a123a10e9570af66831180e (patch) | |
| tree | 5790a7c5a0e534528da4346645a3feafd516ed39 /tests/Tests/Readers/RST.hs | |
| parent | af7e78243682ec7c353dd202590c45c734f86ada (diff) | |
Test fixes.
Diffstat (limited to 'tests/Tests/Readers/RST.hs')
| -rw-r--r-- | tests/Tests/Readers/RST.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/Tests/Readers/RST.hs b/tests/Tests/Readers/RST.hs index df6ba61b2..ea85a5929 100644 --- a/tests/Tests/Readers/RST.hs +++ b/tests/Tests/Readers/RST.hs @@ -42,9 +42,9 @@ tests = [ "line block with blank line" =: , (text "IP address", [para "10.0.0.19"]) , (str "Size", [para "3ru"]) , (str "Version", [para "1"]) - , (str "Indentation", [para "Since the field marker may be quite long, the second and subsequent lines of the field body do not have to line up with the first line, but they must be indented relative to the field name marker, and they must line up with each other."]) + , (str "Indentation", [para "Since the field marker may be quite long, the second\nand subsequent lines of the field body do not have to line up\nwith the first line, but they must be indented relative to the\nfield name marker, and they must line up with each other."]) , (text "Parameter i", [para "integer"]) - , (str "Final", [para "item on two lines"]) + , (str "Final", [para "item\non two lines"]) ]) , "metadata" =: unlines [ "=====" @@ -87,6 +87,7 @@ tests = [ "line block with blank line" =: para (link "http://google.com" "" "http://google.com" <> ", " <> link "http://yahoo.com" "" "http://yahoo.com" <> "; " <> link "http://foo.bar.baz" "" "http://foo.bar.baz" <> ". " <> + softbreak <> link "http://foo.bar/baz_(bam)" "" "http://foo.bar/baz_(bam)" <> " (" <> link "http://foo.bar" "" "http://foo.bar" <> ")") , "Reference names with special characters" =: |