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

run annex monad in quiet mode when testing

Browse source 
This cleans up the merging messages.
This commit is contained in:
Joey Hess 2011-12-20 16:03:14 -04:00
parent 3d188d8db9
commit 9f65410fd8
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
test.hs
View file

@ -565,7 +565,7 @@ annexeval a = do
g <- Git.Construct.fromCwd g <- Git.Construct.fromCwd
g' <- Git.Config.read g g' <- Git.Config.read g
s <- Annex.new g' s <- Annex.new g'
Annex.eval s a Annex.eval s { Annex.output = Annex.QuietOutput } a
innewrepo :: Assertion -> Assertion innewrepo :: Assertion -> Assertion
innewrepo a = withgitrepo $ \r -> indir r a innewrepo a = withgitrepo $ \r -> indir r a