From 4b90ffe1bd481c9330ffdad455676df6fe2fa6d4 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Mon, 11 Apr 2011 14:45:42 -0700 Subject: Allow '|' followed by newline in RST line block. --- src/Tests/Readers/RST.hs | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/Tests/Readers') diff --git a/src/Tests/Readers/RST.hs b/src/Tests/Readers/RST.hs index 3ca4e42bf..4b8c9301b 100644 --- a/src/Tests/Readers/RST.hs +++ b/src/Tests/Readers/RST.hs @@ -17,7 +17,10 @@ infix 5 =: (=:) = test rst tests :: [Test] -tests = [ "field list" =: +tests = [ "line block with blank line" =: + "| a\n|\n| b" =?> para (str "a" +++ linebreak +++ + linebreak +++ str " " +++ str "b") + , "field list" =: [_LIT| :Hostname: media08 :IP address: 10.0.0.19 -- cgit v1.2.3