diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2011-01-26 17:18:02 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2011-01-26 17:23:57 -0800 |
| commit | 703c421c9e8684bb20aa091223ca5e532b6bb867 (patch) | |
| tree | a207a2ac7c25341382392447798c89089286283b /tests/Tests/Readers/RST.hs | |
| parent | 80f5a89a0bc7342fed7251d4e3f3bc8bda1a7acc (diff) | |
RST reader: Improved field lists.
Field lists now work properly with block content.
(Thanks to Lachlan Musicman for pointing out the bug.)
In addition, definition list items are now always Para instead
of Plain -- which matches behavior of rst2xml.py.
Finally, in image blocks, the alt attribute is parsed properly
and used for the alt, not also the title.
Diffstat (limited to 'tests/Tests/Readers/RST.hs')
| -rw-r--r-- | tests/Tests/Readers/RST.hs | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/tests/Tests/Readers/RST.hs b/tests/Tests/Readers/RST.hs index d404ef0ce..c0f60ff51 100644 --- a/tests/Tests/Readers/RST.hs +++ b/tests/Tests/Readers/RST.hs @@ -27,20 +27,20 @@ tests = [ "field list" =: :Authors: - Me - Myself - I -:Indentation: 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. -:Parameter i: integer +:Indentation: 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. +:Parameter i: integer |] =?> ( setAuthors ["Me","Myself","I"] $ setDate "2001-08-16" $ doc - $ definitionList [ (str "Hostname", [plain "media08"]) - , (str "IP address", [plain "10.0.0.19"]) - , (str "Size", [plain "3ru"]) - , (str "Version", [plain "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 "Parameter i", [plain "integer"]) + $ definitionList [ (str "Hostname", [para "media08"]) + , (str "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 "Parameter i", [para "integer"]) ]) ] |