1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
|
DocAppend
(DocParagraph (DocString "Single outer cell:"))
(DocAppend
(DocTable
Table
{tableBodyRows = [TableRow
[TableCell
{tableCellColspan = 1,
tableCellContents = DocString
(concat
["outer\n",
"\n",
"-------+\n",
"inner |"]),
tableCellRowspan = 1}]],
tableHeaderRows = []})
(DocAppend
(DocParagraph (DocString "Broken (only inner cell is rendered):"))
(DocTable
Table
{tableBodyRows = [TableRow
[TableCell
{tableCellColspan = 1,
tableCellContents = DocString "inner",
tableCellRowspan = 1}]],
tableHeaderRows = []})))
|