aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers/Man.hs
diff options
context:
space:
mode:
Diffstat (limited to 'test/Tests/Readers/Man.hs')
-rw-r--r--test/Tests/Readers/Man.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/test/Tests/Readers/Man.hs b/test/Tests/Readers/Man.hs
index 7541d1c67..7fd265122 100644
--- a/test/Tests/Readers/Man.hs
+++ b/test/Tests/Readers/Man.hs
@@ -54,6 +54,13 @@ tests = [
"fonts" =:
"aa\\fIbb\\fRcc"
=?> (para $ str "aa" <> (emph $ str "bb") <> str "cc")
+ , "nested fonts" =:
+ "\\f[BI]hi\\f[I] there\\f[R]"
+ =?> para (emph (strong (text "hi") <> text " there"))
+ , "nested fonts 2" =:
+ "\\f[R]hi \\f[I]there \\f[BI]bold\\f[R] ok"
+ =?> para (text "hi " <> emph (text "there " <> strong (text "bold")) <>
+ text " ok")
, "skip" =:
"a\\%\\{\\}\\\n\\:b\\0"
=?> (para $ str "ab")