26 type WikiPage = [BlockElement]
31 | Inline !InlineElement
32 deriving (Eq, Show, Typeable, Data)
35 type Attribute = (String, String)
41 , headingText :: !String
46 , listItems :: ![ListItem]
48 | DefinitionList ![Definition]
49 | Preformatted ![InlineElement]
50 | Paragraph ![InlineElement]
51 | Div ![Attribute] ![Element]
53 | BlockCmd !BlockCommand
54 deriving (Eq, Show, Typeable, Data)
59 | Italic ![InlineElement]
60 | Bold ![InlineElement]
62 objLinkPage :: !PageName
63 , objLinkText :: !(Maybe String)
66 linkPage :: !(Maybe PageName)
67 , linkFragment :: !(Maybe String)
68 , linkText :: !(Maybe String)
72 , extLinkText :: !(Maybe String)
74 | LineBreak ![Attribute]
75 | Span ![Attribute] ![InlineElement]
77 imgSource :: !PageName
78 , imgAlt :: !(Maybe String)
80 | Anchor ![Attribute] ![InlineElement]
82 | InlineCmd !InlineCommand
83 deriving (Eq, Show, Typeable, Data)
89 deriving (Eq, Show, Typeable, Data)
92 type ListItem = [Element]
97 defTerm :: ![InlineElement]
98 , defDesc :: ![InlineElement]
100 deriving (Eq, Show, Typeable, Data)
112 , bCmdAttributes :: ![Attribute]
113 , bCmdContents :: ![BlockElement]
115 deriving (Eq, Show, Typeable, Data)
121 , iCmdAttributes :: ![Attribute]
122 , iCmdContents :: ![InlineElement]
124 deriving (Eq, Show, Typeable, Data)