51d9d8b · typeable/pandoc

git.iko.soy/typeable/pandoc

test-pandoc: Fixed + and - in diff output, which were reversed.

commit51d9d8b674ea21c821113ec2bf92bb5e8a1cf067 authorJohn MacFarlane <jgm@berkeley.edu> dateTue 11 Jan 2011, 18:10 (16 years ago) parent715e337

1 file changed+2−2

unifiedsplit

tests/test-pandoc.hs+2−2

@@ -37,8 +37,8 @@ instance Show TestResult where

3737

3838showDiff :: [(DI, String)] -> String

3939showDiff [] = ""

40−showDiff ((F, ln) : ds) = "- " ++ ln ++ "\n" ++ showDiff ds

41−showDiff ((S, ln) : ds) = "+ " ++ ln ++ "\n" ++ showDiff ds

40+showDiff ((F, ln) : ds) = "+ " ++ ln ++ "\n" ++ showDiff ds

41+showDiff ((S, ln) : ds) = "- " ++ ln ++ "\n" ++ showDiff ds

4242showDiff ((B, _ ) : ds) = showDiff ds

4343

4444tests :: [Test]