aboutsummaryrefslogtreecommitdiff
path: root/Text/Pandoc/Definition.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Text/Pandoc/Definition.hs')
-rw-r--r--Text/Pandoc/Definition.hs7
1 files changed, 5 insertions, 2 deletions
diff --git a/Text/Pandoc/Definition.hs b/Text/Pandoc/Definition.hs
index 96d0a6ec0..a518314a6 100644
--- a/Text/Pandoc/Definition.hs
+++ b/Text/Pandoc/Definition.hs
@@ -61,12 +61,15 @@ data ListNumberDelim = DefaultDelim
| Period
| OneParen
| TwoParens deriving (Eq, Show, Read)
-
+
+-- | Attributes.
+type Attr = (String, [String], [(String, String)]) -- ^ Identifier, classes, key-value pairs
+
-- | Block element.
data Block
= Plain [Inline] -- ^ Plain text, not a paragraph
| Para [Inline] -- ^ Paragraph
- | CodeBlock String String -- ^ Code block (literal) with class
+ | CodeBlock Attr String -- ^ Code block (literal) with attributes
| RawHtml String -- ^ Raw HTML block (literal)
| BlockQuote [Block] -- ^ Block quote (list of blocks)
| OrderedList ListAttributes [[Block]] -- ^ Ordered list (attributes