aboutsummaryrefslogtreecommitdiff
path: root/test/rtf/formatting.native
diff options
context:
space:
mode:
Diffstat (limited to 'test/rtf/formatting.native')
-rw-r--r--test/rtf/formatting.native88
1 files changed, 41 insertions, 47 deletions
diff --git a/test/rtf/formatting.native b/test/rtf/formatting.native
index 6e5001de3..7035ccb91 100644
--- a/test/rtf/formatting.native
+++ b/test/rtf/formatting.native
@@ -1,51 +1,45 @@
Pandoc
- ( Meta
- { unMeta = fromList
- [
- ( "operator"
- , MetaInlines
- [ Str "John", Space, Str "MacFarlane" ]
- )
- ]
+ Meta
+ { unMeta =
+ fromList
+ [ ( "operator"
+ , MetaInlines [ Str "John" , Space , Str "MacFarlane" ]
+ )
+ ]
}
- )
[ Para
- [ Str "This"
- , Space
- , Str "is"
- , Space
- , Str "a"
- , Space
- , Str "test"
- , Space
- , Str "of"
- , Space
- , Str "FORMATTING."
- , Space
- , Str "This"
- , Space
- , Str "is"
- , Space
- , Str "hidden:"
- , Space
- , Str "."
- ]
- , Para
- [ SmallCaps [ Str "Small", Space, Str "Caps" ] ]
- , Para
- [ Strong [ Str "bold" ] ]
- , Para
- [ Emph [ Str "italics" ] ]
- , Para
- [ Strong
- [ Str "bold", Space, Emph [ Str "and", Space, Str "italics" ] ]
- ]
- , Para
- [ Underline [ Str "underlined" ] ]
- , Para
- [ Strikeout [ Str "strikeout" ] ]
- , Para
- [ Str "x", Superscript [ Str "superscript" ] ]
- , Para
- [ Str "x", Subscript [ Str "subscript" ] ]
+ [ Str "This"
+ , Space
+ , Str "is"
+ , Space
+ , Str "a"
+ , Space
+ , Str "test"
+ , Space
+ , Str "of"
+ , Space
+ , Str "FORMATTING."
+ , Space
+ , Str "This"
+ , Space
+ , Str "is"
+ , Space
+ , Str "hidden:"
+ , Space
+ , Str "."
+ ]
+ , Para [ SmallCaps [ Str "Small" , Space , Str "Caps" ] ]
+ , Para [ Strong [ Str "bold" ] ]
+ , Para [ Emph [ Str "italics" ] ]
+ , Para
+ [ Strong
+ [ Str "bold"
+ , Space
+ , Emph [ Str "and" , Space , Str "italics" ]
+ ]
+ ]
+ , Para [ Underline [ Str "underlined" ] ]
+ , Para [ Strikeout [ Str "strikeout" ] ]
+ , Para [ Str "x" , Superscript [ Str "superscript" ] ]
+ , Para [ Str "x" , Subscript [ Str "subscript" ] ]
]