aboutsummaryrefslogtreecommitdiff
path: root/test/Tests
diff options
context:
space:
mode:
Diffstat (limited to 'test/Tests')
-rw-r--r--test/Tests/Readers/Man.hs18
1 files changed, 15 insertions, 3 deletions
diff --git a/test/Tests/Readers/Man.hs b/test/Tests/Readers/Man.hs
index a9fe324d1..4807095a5 100644
--- a/test/Tests/Readers/Man.hs
+++ b/test/Tests/Readers/Man.hs
@@ -23,10 +23,22 @@ tests = [
-- .SH "HEllo bbb" "aaa"" as"
testGroup "Macros" [
"Bold" =:
- ".B foo\n"
+ ".B foo"
=?> (para $ strong "foo")
, "Italic" =:
- ".I foo\n"
- =?> (para $ emph "foo")
+ ".I bar\n"
+ =?> (para $ emph "bar")
+ , "BoldItalic" =:
+ ".BI foo bar"
+ =?> (para $ strong $ emph $ str "foo bar")
+ , "H1" =:
+ ".SH The header\n"
+ =?> header 2 (str "The header")
+ , "H2" =:
+ ".SS The header 2"
+ =?> header 3 (str "The header 2")
+ , "Macro args" =:
+ ".B \"single arg with \"\"Q\"\"\""
+ =?> (para $ strong $ str "single arg with \"Q\"")
]
]