mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

don't force quiet mode for tests expected to succeed

Browse source 
This way when there's a failure the output is available to understand
the problem. Should help with some intermittent test failures that I
have not been able to reproduce to understand why it's failing.

Does mean the test output is more verbose, but it was already very
verbose.
This commit is contained in:
Joey Hess 2019-02-18 18:56:26 -04:00
parent 1e95bc4fd1
commit fe9bfa8157
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Test/Framework.hs
View file

@ -55,7 +55,7 @@ git_annex command params = git_annex' command params >>= \case
-- For when git-annex is expected to fail. -- For when git-annex is expected to fail.
git_annex_shouldfail :: String -> [String] -> IO Bool git_annex_shouldfail :: String -> [String] -> IO Bool
git_annex_shouldfail command params = git_annex' command params >>= \case git_annex_shouldfail command params = git_annex' command ("-q":params) >>= \case
Right () -> return False Right () -> return False
Left _ -> return True Left _ -> return True
@ -67,7 +67,7 @@ git_annex' command params = do
run = GitAnnex.run dummyTestOptParser run = GitAnnex.run dummyTestOptParser
dummyTestRunner dummyTestRunner
dummyBenchmarkGenerator dummyBenchmarkGenerator
(command:"-q":params) (command:params)
dummyTestOptParser = pure mempty dummyTestOptParser = pure mempty
dummyTestRunner _ = noop dummyTestRunner _ = noop
dummyBenchmarkGenerator _ _ = return noop dummyBenchmarkGenerator _ _ = return noop