- [ Div [("class", "imageData")]
- [ Paragraph [ Anchor [hrefAttr]
- [ Image pageName Nothing ] ]
- ]
- , Div [("class", "imageCaption")] inside
+ [ Block (Div [("class", "imageData")]
+ [ Inline (Anchor [hrefAttr]
+ [ Image pageName Nothing ]) ])
+ , Block (Div [("class", "imageCaption")]
+ [ Block x | x <- inside ])