Merge pull request #12 from sol/master

Preserve layout of HUnit error messages (close #11)
batterseapower · Jan 27, 2012 · e0bbbc3 · e0bbbc3
2 parents e877afd + ad18657
commit e0bbbc3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/hunit/Test/Framework/Providers/HUnit.hs b/hunit/Test/Framework/Providers/HUnit.hs
@@ -47,7 +47,7 @@ data TestCaseResult = TestCasePassed
 instance Show TestCaseResult where
     show result = case result of
         TestCasePassed         -> "OK"
-        TestCaseFailed message -> "Failed: " ++ message
+        TestCaseFailed message -> message
         TestCaseError message  -> "ERROR: " ++ message
 
 testCaseSucceeded :: TestCaseResult -> Bool