summaryrefslogtreecommitdiff
path: root/tests/textile-reader.native
diff options
context:
space:
mode:
authorPaul Rivier <paul.r.ml@gmail.com>2010-11-23 12:09:04 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2010-12-03 23:10:51 -0800
commitd724c6b5681b2f5815b7d915d5e39a7d3979e7f8 (patch)
treeda67082fda81cbee917ebbe990abf7daddb8cc24 /tests/textile-reader.native
parentfa0866886be778b0157340ea0563b6744424cfa6 (diff)
html inlines and html blocks handling in textile reader
Diffstat (limited to 'tests/textile-reader.native')
-rw-r--r--tests/textile-reader.native16
1 files changed, 15 insertions, 1 deletions
diff --git a/tests/textile-reader.native b/tests/textile-reader.native
index 2b91ab7ac..738362b09 100644
--- a/tests/textile-reader.native
+++ b/tests/textile-reader.native
@@ -113,4 +113,18 @@ Pandoc (Meta {docTitle = [Str ""], docAuthors = [[Str ""]], docDate = [Str ""]})
, [ Plain [Str "sex"] ] ],
[ [ Plain [Str "joan"] ]
, [ Plain [Str "24"] ]
- , [ Plain [Str "f"] ] ] ] ]
+ , [ Plain [Str "f"] ] ] ]
+, Header 1 [Str "Raw",Space,Str "HTML"]
+, Para [Str "However,",Space,HtmlInline "<strong>",Space,Str "raw",Space,Str "HTML",Space,Str "inlines",Space,HtmlInline "</strong>",Space,Str "are",Space,Str "accepted,",Space,Str "as",Space,Str "well",Space,Str "as",Space,Str ":"]
+, RawHtml "<div class=\"foobar\">"
+, Para [Str "any",Space,Strong [Str "Raw",Space,Str "HTML",Space,Str "Block"],Space,Str "with",Space,Str "bold"]
+, RawHtml "</div>"
+, Para [Str "Html",Space,Str "blocks",Space,Str "can",Space,Str "be"]
+, RawHtml "<div>"
+, Para [Str "inlined"]
+, RawHtml "</div>"
+, Para [Str "as",Space,Str "well."]
+, BulletList
+ [ [ Plain [Str "this",Space,Str "<",Str "div",Str ">",Space,Str "won",Str "'",Str "t",Space,Str "produce",Space,Str "raw",Space,Str "html",Space,Str "blocks",Space,Str "<",Str "/div",Str ">"] ]
+ , [ Plain [Str "but",Space,Str "this",Space,HtmlInline "<strong>",Space,Str "will",Space,Str "produce",Space,Str "inline",Space,Str "html",Space,HtmlInline "</strong>"] ] ]
+, Para [Str "Can",Space,Str "you",Space,Str "prove",Space,Str "that",Space,Str "2",Space,Str "<",Space,Str "3",Space,Str "?"] ]