diff options
| author | paul.rivier <paul.r.ml@gmail.com> | 2010-09-17 18:20:03 +0200 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2010-12-03 23:10:51 -0800 |
| commit | d917db5e42353c2878e429fd29bf7ef6d576ad62 (patch) | |
| tree | 52515b0332fd115b0e932e53788572a8f3aed3f5 /src/Text/Pandoc/Definition.hs | |
| parent | 75fa22c30039d1b4b9db46b3fe02591fa4152806 (diff) | |
| download | pandoc-d917db5e42353c2878e429fd29bf7ef6d576ad62.tar.gz | |
preliminary material toward table support
Diffstat (limited to 'src/Text/Pandoc/Definition.hs')
| -rw-r--r-- | src/Text/Pandoc/Definition.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Definition.hs b/src/Text/Pandoc/Definition.hs index 0972d5f4c..ec8c77185 100644 --- a/src/Text/Pandoc/Definition.hs +++ b/src/Text/Pandoc/Definition.hs @@ -47,6 +47,9 @@ data Alignment = AlignLeft | AlignCenter | AlignDefault deriving (Eq, Ord, Show, Read, Typeable, Data) +-- | Table cells are list of Blocks +type TableCell = [Block] + -- | List attributes. type ListAttributes = (Int, ListNumberStyle, ListNumberDelim) @@ -85,7 +88,7 @@ data Block -- definitions (each a list of blocks) | Header Int [Inline] -- ^ Header - level (integer) and text (inlines) | HorizontalRule -- ^ Horizontal rule - | Table [Inline] [Alignment] [Double] [[Block]] [[[Block]]] -- ^ Table, + | Table [Inline] [Alignment] [Double] [TableCell] [[TableCell]] -- ^ Table, -- with caption, column alignments, -- relative column widths (0 = default), -- column headers (each a list of blocks), and |