lib: hide successful hunit tests, to avoid obscuring failed doctests (#568)
This commit is contained in:
		
							parent
							
								
									da9aa81ec7
								
							
						
					
					
						commit
						dae17093c3
					
				| @ -1,6 +1,10 @@ | |||||||
| import Hledger (tests_Hledger) | import Hledger (tests_Hledger) | ||||||
|  | import System.Environment (getArgs) | ||||||
| import Test.Framework.Providers.HUnit (hUnitTestToTests) | import Test.Framework.Providers.HUnit (hUnitTestToTests) | ||||||
| import Test.Framework.Runners.Console (defaultMain) | import Test.Framework.Runners.Console (defaultMainWithArgs) | ||||||
| 
 | 
 | ||||||
| main :: IO () | main :: IO () | ||||||
| main = defaultMain $ hUnitTestToTests tests_Hledger | main = do | ||||||
|  |   args <- getArgs | ||||||
|  |   let args' = "--hide-successes" : args | ||||||
|  |   defaultMainWithArgs (hUnitTestToTests tests_Hledger) args' | ||||||
|  | |||||||
		Loading…
	
		Reference in New Issue
	
	Block a user