From 7e8b4451a91759debfda44963020d2c02f8f5790 Mon Sep 17 00:00:00 2001 From: Jakub Janczak Date: Thu, 31 Oct 2019 22:50:58 +0100 Subject: [PATCH] Fixing the display of path - now every part of path (each group) and the actual test are intercalated with : --- core/src/Test/Framework/Runners/Console.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/src/Test/Framework/Runners/Console.hs b/core/src/Test/Framework/Runners/Console.hs index 7aca279..f70ea11 100644 --- a/core/src/Test/Framework/Runners/Console.hs +++ b/core/src/Test/Framework/Runners/Console.hs @@ -164,7 +164,7 @@ listTests tests = "\ntest-framework: All available tests:\n"++ where showTest :: String -> Test -> [String] showTest path (Test name _testlike) = [" "++path ++ name] - showTest path (TestGroup name gtests) = concatMap (showTest (path++":"++name)) gtests + showTest path (TestGroup name gtests) = concatMap (showTest (path++name++":")) gtests showTest path (PlusTestOptions _ test) = showTest path test showTest path (BuildTestBracketed _) = [" "++path ++ ""]