From 7741cdbf04f93875e6cd2051a6778c2ca35b5e40 Mon Sep 17 00:00:00 2001
From: Yan Pas <yanp.bugz@gmail.com>
Date: Wed, 17 Oct 2018 00:21:52 +0300
Subject: added old-style test

---
 test/Tests/Readers/Man.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'test/Tests/Readers')

diff --git a/test/Tests/Readers/Man.hs b/test/Tests/Readers/Man.hs
index 4d8e13fb1..9dbfbab4d 100644
--- a/test/Tests/Readers/Man.hs
+++ b/test/Tests/Readers/Man.hs
@@ -73,7 +73,7 @@ tests = [
       =?> orderedListWith (1,UpperAlpha,DefaultDelim) [plain $ str "first", plain $ str "second"]
     , "nested" =:
       ".IP\nfirst\n.RS\n.IP\n1a\n.IP\n1b\n.RE"
-      =?> fromList [BulletList [[Plain [Str "first"],BulletList [[Plain [Str "1a"]],[Plain [Str "1b"]]]]]]
+      =?> bulletList [(plain $ str "first") <> (bulletList [plain $ str "1a", plain $ str "1b"])]
     ],
   testGroup "CodeBlocks" [
       "cb1"=:
-- 
cgit v1.2.3