From e6e3823982cb9755b7cb4727fb08171eed5b4332 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Thu, 25 Feb 2016 14:26:47 +0100 Subject: Accept trailing newlines --- bbcode/test/Text/BBCodeSpec.hs | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'bbcode/test/Text/BBCodeSpec.hs') diff --git a/bbcode/test/Text/BBCodeSpec.hs b/bbcode/test/Text/BBCodeSpec.hs index a6e66b6..4e7ea72 100644 --- a/bbcode/test/Text/BBCodeSpec.hs +++ b/bbcode/test/Text/BBCodeSpec.hs @@ -61,5 +61,11 @@ examples = [ ("[t]test[/t]" , [[Element "b" [] [Content "foo"]], [Element "b" [] [Content "bar"]]]) , ("[b]foo[/b][b]bar[/b]" , [[Element "b" [] [Content "foo"], Element "b" [] [Content "bar"]]]) + , ("[b]foo[/b]\n" + , [[Element "b" [] [Content "foo"]]]) + , ("[b]foo[/b] \n" + , [[Element "b" [] [Content "foo"], Content " "]]) + , ("[b]foo[/b] " + , [[Element "b" [] [Content "foo"], Content " "]]) ] -- cgit v1.2.3