From cf5e8a824fe44ad65f1a3eb6255457667ba0cf70 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Tue, 11 Jan 2011 19:10:35 -0800 Subject: test-pandoc: Improved header for diff output. --- tests/test-pandoc.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tests') diff --git a/tests/test-pandoc.hs b/tests/test-pandoc.hs index 586b807c2..7b585a921 100644 --- a/tests/test-pandoc.hs +++ b/tests/test-pandoc.hs @@ -33,8 +33,8 @@ data TestResult = TestPassed instance Show TestResult where show TestPassed = "PASSED" show (TestError ec) = "ERROR " ++ show ec - show (TestFailed cmd file d) = cmd ++ "\n--- expected (" ++ file ++ ")" ++ - "\n+++ actual\n" ++ showDiff d + show (TestFailed cmd file d) = "\n--- " ++ file ++ + "\n+++ " ++ cmd ++ "\n" ++ showDiff d showDiff :: [(DI, String)] -> String showDiff [] = "" -- cgit v1.2.3